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

Mehmet Sait

Altın Üye
Katılım
19 Ekim 2009
Mesajlar
834
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,651
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
834
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
834
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
42,171
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.
 

Mehmet Sait

Altın Üye
Katılım
19 Ekim 2009
Mesajlar
834
Excel Vers. ve Dili
Office 2016 TR
Altın Üyelik Bitiş Tarihi
08-09-2028
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.
Teşekkür ederim
 
Üst