Binlik ayırıcı

[isodem]

Merhaba,

Ne yaptıysam olmadı lütfen anlayan biri derdime bir çare olsun.

örneğin 12500 değeri yazıyorum veya başka bir sayfadan kopyalama yapıyorum otomatik olarak 12.500 olarak gözükmesini bir türlü sağlayamadım.
Bölgesel ayarlardan düzenledim,excel gelişmiş ayarlardan otomatik ayırıcı kullandım ,sistem ayırıcısını kullandım yinede yapamadım.



Excel 2010 kullanıyorum sürüm ise 14.0.5128

 

[yanginci34]

Hücre biçimlendir den sayı sekmesinde virgülü sıfıra getir ve örnek gösterilen sayının alt kısmında da binlik ayracı kullan var onun seçili olmasına dikkat ediniz.

 

[Orion1]

A sütununu seçin.
Resime göre biçimlendirin.

 

[Serdarrk]

Peki bunu 250 sayfalık bir excel dosyasında tüm sayfalardaki sayılara uygulamanın bir kısayolu var mıdır?

 

[Orion1]

Peki bunu 250 sayfalık bir excel dosyasında tüm sayfalardaki sayılara uygulamanın bir kısayolu var mıdır?

Belki makro yazılabilir.

 

[Serdarrk]

Belki makro yazılabilir.

Bence bunu yazsa yazsa en iyi siz yazabilirsiniz

 

[Orion1]

Bence bunu yazsa yazsa en iyi siz yazabilirsiniz

Estafurullah,bunu yazabilecek çok arkadaşlar var burada.

 

[isodem]

hocam bu şekilde oluyor onda sıkıntı yok ama ben bu işlemler yapmadan bir yolu var mı onu öğrenmek istiyorum .ctrl+shift+1 basıp yapabiliyorum mesela onda da 12.500,00 oluyor.makro veya başka bir ayar ile direkt yazdığımda 12.500 olmasını sağlamak niyetim

 

[Orion1]

hocam bu şekilde oluyor onda sıkıntı yok ama ben bu işlemler yapmadan bir yolu var mı onu öğrenmek istiyorum .ctrl+shift+1 basıp yapabiliyorum mesela onda da 12.500,00 oluyor.makro veya başka bir ayar ile direkt yazdığımda 12.500 olmasını sağlamak niyetim

Biçimlendirme yapmadan nasıl olacak.
Verileri manuel el ile giriyorsanız hücre biçimlendirmeden biçimlendirme yapmanız lazım.
Sütunu/Sütunları seçip o sütunu/sütunları olduğu gibi biçimlendirebilirsiniz.

 

[yanginci34]

Aşağıdaki kodu bir modüle yerleştirip düğme ile çalıştırarak denermisiniz.

Sub sayi()
Dim i
For i = 1 To Worksheets.Count
Sheets(i).Select
Cells.Select
Selection.NumberFormat = "#,##0"

Next i
End Sub

 

[Serdarrk]

Mükemmel çalışıyor. Emeğinize sağlık teşekkür ederim.

 

[ismailmustafa]

bütün sayfaları seçili duruma getirerek hücre biçimlendirmeden yapılabilir

 

[yanginci34]

Ben teşekkür ederim kolay gelsin.

 

[isodem]

Aşağıdaki kodu bir modüle yerleştirip düğme ile çalıştırarak denermisiniz.

Hocam ellerine sağlık. işimi çözüme kavuşturdun aradığım buydu.

 

[yanginci34]

Rica ederim.