Sayı Formatları Hk.

[bsen]

Günaydın herkese,
Basit bir sorum olacak. Bir database inceliyoruz ve sayı formatlar virgülden sonra 3 basamak daha gitmeli. Karışıklığı önlemek adına sayı 14 punto, virgülden sonrası 8 punto olsun istiyorum. Mümkün müdür?
Teşekkür ederim.

 

[YUSUF44]

Yaptığım araştırmalarda sayılarda aynı hücrede farklı biçim kullanmanın mümkün olmadığını gördüm. Yani sayıyı hücre içine girip bir kısmını farklı biçimlendirmek mümkün değil. Bunu yapabilmek için hücrenin sayı olarak değil metin olarak biçimlendirilmesi gerekiyor.

Bununla ilgili denemelerim sonucunda aşağıdaki makroyla C2'den itibaren C sütunundaki son dolu satıra kadar olan verileri sizin istediğiniz gibi biçimlendirebildim:

Sub fontlar()
son = Cells(Rows.Count, "C").End(3).Row
For i = 2 To son
    If Len(Cells(i, "C")) <> Len(Replace(Cells(i, "C"), ",", "")) Then
        For j = 1 To Len(Cells(i, "C"))
            If Mid(Cells(i, "C"), j, 1) = "," Then
                Cells(i, "C") = Format(Cells(i, "C"), "#,##0.000")
                Cells(i, "C").Characters(Start:=1, Length:=j).Font.Size = 14
                Cells(i, "C").Characters(Start:=j + 1, Length:=3).Font.Size = 8
            End If
        Next
    End If
Next
End Sub

 

[Korhan Ayhan]

Benzer konular...

Aynı Hücrede Punto Farklılığı

Merhaba, Bütün üstadlarıma kolay gelsin.. Sizlerden bir ricam olacak.. Formül sonucu aynı hücre içerisindeki tutarın virgülün sol tarafının puntosu 26, virgül dahil sağ tarafınında 16 olmasını istiyorum.. Mümkün müdür? Sizce hayalden mi ibarettir.. :) Şimdiden herkese teşekkür ederim.. Allah...

www.excel.web.tr

Birleştir komutu uygulanan hücre içindeki değerin puntosunu değiştirme

Merhaba, Birleştir komutu uygulanan hücre içinde font uygulamak istiyorum. Kısaca aynı hücre içinde birleştirilen ikinci değerin yazı puntosunu 8 yapmak istiyorum. =BİRLEŞTİR('PC-YAZICI-MONİTÖR VS'!B48;" ";'PC-YAZICI-MONİTÖR VS'!F48) B48 den aldığım değerin 12, F48 den aldığım değerin 8...

www.excel.web.tr