Kod'da Düzeltme

[ataköylü-59]

Sub aciklamafont()
Dim hucre As Range
For Each hucre In Cells.SpecialCells(xlCellTypeComments)
hucre.Comment.Visible = True
hucre.Comment.Shape.Select True
Selection.Font.Color = -1759197
Selection.Font.Name = "Calibri"
Selection.Font.Italic = True
Selection.Font.Size = 8
Selection.Font.Bold = False
hucre.Comment.Visible = False
Next
End Sub

Saygıdeğer üstadlarım
Yuakarıdaki Kod ile Excel Hücresine eklenen açıklamaların içindeki yazıyı yukarıdaki gibi düzenliyorum. Buradaki Selection.Font.Italic = True ifadesindeki Italic sözcüğünü kaldırıp yerine yazılanların Normal düz yazı şeklinde görünmesini sağlayan düzenlemenin yapılmasını istiyorum.
Saygılarımla.

 

[muygun]

Merhaba;

Selection.Font.Italic = True

kısmını;

Selection.Font.Italic = False

Şeklinde deneyin.

İyi çalışmalar.

 

[ataköylü-59]

Merhaba;

Selection.Font.Italic = True

kısmını;

Selection.Font.Italic = False

Şeklinde deneyin.

İyi çalışmalar.

Sayın muygun çok çok teşekkürler efendim. Düzeltmeyi tarifinizdeki gibi yaptım oldu.