nokta virgül

[canerrrrrr]

arkadaşlar ... 11 subemizin ayrı ayrı pencerelerde girmiş oldugu kasa sablonları hazırladım.. bitanesini ekte sundum... fakat bu 11 subedeki arkadaslara rakamların arasına virgül koymaları gerektiğini öğretemedimm 6 aydır... yazılan rakama koyulan nokta yerine virgül konması için kod sayfasına ne gibi bir kod yazmalıyımm .. ne olur yardım edinn.. mesela
125,87 yazılcaksa 125.87 yazıolar ve bunu excel toplayamıor....

 

[ECYavuz]

Selamlar;

Aşağıdaki Kod'u istediğiniz diğer değişikliklerde de kullanabilirsiniz...

Private Sub Worksheet_Change(ByVal Target As Range)
Target = BH(Target)
End Sub

Function BH(cevir)
'BH = Replace(cevir, "i", "İ") örnek olarak
BH = Replace(cevir, ".", ",")
End Function

 

[canerrrrrr]

cok tesekkur ederımm ... cok basarılı...

 

[ECYavuz]

cok tesekkur ederımm ... cok basarılı...

Rica ederim, İyi çalışmalar...