isteğe uyarlanmış sayı

[halilerdem]

11 karakterli 12345678912 şeklindeki sayıyı bir hücrede 12.345678.912 şeklinde ve ortadaki 6 rakamlı bloğu kalın göstermek istiyorum. İsteğe Uyarlanmış sayı bölümünden yapamadım

 

[Ömer BARAN]

Merhaba.

Sadece noktalı görünüm için hücre biçimini İSTEĞE UYARLANMIŞ kısmından 00"."000000"."000 olarak uygulayabilirsiniz.
Kırmızı ve koyu görünüm için aşağıdaki kod'u kullanabilirsiniz.

[B]Sub brn()[/B]
ActiveCell = "'" & ActiveCell
With ActiveCell.Characters(Start:=3, Length:=6).Font
    .Color = vbRed: .Bold = True
End With
[B]End Sub[/B]

 

[halilerdem]

teşekkürler