formülle aldığın verilerin özellikleri

[muratozo]

arkadaşlar baya acemiyim bilmem problemimi anlatabilecekmiyim; gerek metin içersine formulle aldığım veriler gerekse bir hücreden diğer bir hücreye formülle getirdiğim hücrelerin, kalı, italik ve parantez içide yazılmasını nasıl sağlarım anlayabileceğim en kolay şekilde bunu nasıl başarırım yardımlar için şimdiden teşekkür ederim.

 

[Ömer]

Merhaba,

Sorunuz net değil, küçük bir örnek dosya ekleyerek dosya içersinde olması gerekenleri detaylı açıklarmısınız..

.

 

[muratozo]

hemen gönderiyorum

örnek bir dosya gönderiyorum, ilgin için teşekkürler

 

[Ömer]

Merhaba,

Çalışma sayfasının kod bölümüne kopyalayın. F11 hücresine veri girince kod çalışacaktır.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [F11]) Is Nothing Then Exit Sub
deg1 = "Arsa ve bina bedeli bir arada olmak üzere bu " & _
"gayrimenkule tarafımızdan toplam_"
deg2 = " değer tahmin ve takdir edilmiştir"
    With [B14]
        .Value = deg1 & Format(Target, "#,##0.00 TL") _
        & Target.Offset(0, 1) & deg2
        .Font.Bold = False
        .Characters(Len(deg1) + 1, Len(.Value) - _
        Len(deg1 & deg2)).Font.Bold = True
    End With
End Sub

G11 hücresine yazıyı istediğiniz formata çevirmek için linkteki konulardan faydalanabilirsiniz..

Sayıyı Yazıya Çevirme Uygulamaları

.