Мда, ама не работи правилно - 101 000 го изписва като сто и един хиляди лева, а на всичкото отгоре над 19 милиона (не, че някой ще го пише във фактура де) не работи - дава овърфлоу... Опитах се да го поправя кода, всичко е ок, но... работи само ако десетичния знак примерно е "." или "," :) Не познавам толкова добре ексела и VBA програмирането, но ако имаше променлива която е = decimal symbol.. :)
Edit: Хаха и с това се преборих :) вече мога да го бройкам какъв е символа и функцията ми работи по-добре от оригинала на Щирлиц :) Ето как
-> Запетайката = Application.International(xlDecimalSeparator)


Хубавото на лошото и лошото на хубавото е, че все някога свършват.

Редактирано от SimonP на 13.06.05 20:00.