Üstbilgi Fond sorunu

[Leoncio]

Merhaba;

Yapmış olduğum çalışmamda üstbilgiyi aşağıdaki kodlarla yapabiliyorum. Üstbilgi fondunu kalın ve boyutunu 14 yapmak istersem kodlarda ne gibi değişiklik yapmalıyım.

Sub ustbilgi()
ActiveSheet.PageSetup.CenterHeader _
= "DENEME APARTMANI" _
& Chr(10) & [C56] & " LİSTEM"
End Sub

 

[Ayhan Ercan]

Sub ustbilgi()
ActiveSheet.PageSetup.CenterHeader _
= "&""Arial Tur,Kalın""&14DENEME APARTMANI" _
& Chr(10) & [C56] & " LİSTEM"
End Sub

böyle deneyiniz...

 

[Leoncio]

Teşekkürler. İşlem tamamdır.