Sayıda küsürat varsa göstersin

Mehmet Sait

Altın Üye
Katılım
19 Ekim 2009
Mesajlar
840
Excel Vers. ve Dili
Office 2016 TR
Altın Üyelik Bitiş Tarihi
08-09-2028
Merhaba,

Sayıda küsürat varsa küsüratı göstersin yoksa göstermesin şartı yapılabilir mi acaba?

Örnek : küsürat varsa 1.227,50 - küsürat yoksa 1.227

Yardımlarınız için teşekkür ederim.
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,652
Excel Vers. ve Dili
Excel : 2010
Bu şekilde deneyiniz.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Target) = 4 Then
Target.NumberFormat = "#,##0"
End If
If Len(Target) = 6 Then
Target.NumberFormat = "#,##0.00"
End If
End Sub
 
Katılım
15 Şubat 2021
Mesajlar
52
Excel Vers. ve Dili
Excel 2016/VBA
Altın Üyelik Bitiş Tarihi
17-02-2022
merhaba,
evet yapılabilir. Bunun için
1.Aşama ilgili hücreleri veya sayfanın tamamını seçiniz. hücre biçimlendirme kısmından ondalık basamak sayısını 0 yapınız.
225620

2.Aşama ilgili hücreleri veya sayfanın tamamını seçip koşullu biçimlendirme/Biçimlendirilecek hücreleri belirlemek için formül kullan
formül kısmına;
Kod:
=TAMSAYI(A1)<>A1
Biçimlendirme kısmından ondalık basamak sayısını 2 yapalım.
225621
 

Mehmet Sait

Altın Üye
Katılım
19 Ekim 2009
Mesajlar
840
Excel Vers. ve Dili
Office 2016 TR
Altın Üyelik Bitiş Tarihi
08-09-2028
Bu şekilde deneyiniz.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Target) = 4 Then
Target.NumberFormat = "#,##0"
End If
If Len(Target) = 6 Then
Target.NumberFormat = "#,##0.00"
End If
End Sub
Teşekkür ederim
 

Mehmet Sait

Altın Üye
Katılım
19 Ekim 2009
Mesajlar
840
Excel Vers. ve Dili
Office 2016 TR
Altın Üyelik Bitiş Tarihi
08-09-2028
merhaba,
evet yapılabilir. Bunun için
1.Aşama ilgili hücreleri veya sayfanın tamamını seçiniz. hücre biçimlendirme kısmından ondalık basamak sayısını 0 yapınız.
Ekli dosyayı görüntüle 225620

2.Aşama ilgili hücreleri veya sayfanın tamamını seçip koşullu biçimlendirme/Biçimlendirilecek hücreleri belirlemek için formül kullan
formül kısmına;
Kod:
=TAMSAYI(A1)<>A1
Biçimlendirme kısmından ondalık basamak sayısını 2 yapalım.
Ekli dosyayı görüntüle 225621
Teşekkür ederim.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
43,463
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Ek olarak hücre biçimini GENEL olarak ayarlarsanız sayı küsuratlı ise küsuratlı gösterir. Küsuratlı değilse normal gösterir. Belki işinize yarayabilir.
 
Üst