Makro Satırında Biçimlendirme Yapmak

[baydeniro]

Merhaba Arkadaşlar,

aşağıdaki makroı satırına Kalınlaştırma, İtalik, Font Büyüklüğü, Renk gibi özellikler eklemek mümkün müdür ?

Sheets("RAPOR").Range("A2").Value & "<br>" & _

"-,Kalın""&14&K01+001" &
kodunu buldum ama nasıl uygulanacağını beceremedim.

 

[baydeniro]

Merhaba Arkadaşlar,

aşağıdaki makroı satırına Kalınlaştırma, İtalik, Font Büyüklüğü, Renk gibi özellikler eklemek mümkün müdür ?

Sheets("RAPOR").Range("A2").Value & "<br>" & _

"-,Kalın""&14&K01+001" &
kodunu buldum ama nasıl uygulanacağını beceremedim.

 

[muratb06]

Sub color()
Range(“A1”).Font.color = vbRed 'renk
Range(“A1”).Font.Size = 24 'font büyüklüğü
Range(“A1”).Font.Italic = True 'italik yapar
Range(“A1”).Font.Bold = True 'kalın yapar
Range(“A1”).Font.Underline = True 'altı çizili yapar
End sub

Range("A1") yazan yerler yerine istediğiniz sayfa ve range yolunu yazabilirsiniz.
Sheets("RAPORLAR").range("a1") veya
Sheets("RAPORLAR").range("a1:a10") gibi

ASUS_Z00LD cihazımdan Tapatalk kullanılarak gönderildi