ich möchte die Größe des Kommentarfeldes ändern. Wie geht das?
Danke,
Sascha
mal als Ansatz
Excel Zellen Kommentar Eigenschaften
ob und wie man die Eigenschaften dauerhaftt umstellen kann, weiß ich nicht. Ich helfe mir immer mit fogendem Makro, das alle Kommentare auf allen Arbeitsblättern der aktiven Arbeitsmappe auf einmal nach meinem Geschmack formatiert:
Sub Kommentar_Font()
Dim Cell As Range
For Each Cell In Cells.SpecialCells(xlCellTypeComments)
With Cell.Comment.Shape.TextFrame.Characters.Font
.Size = 100
.Bold = True
.ColorIndex = 3
.FontStyle = "Arial"
End With
Next
End Sub
Oder noch größe
Sub Kommentar_Font_14_AutoSize()
Dim Cell As Range
For Each Cell In Cells.SpecialCells(xlCellTypeComments)
With Cell.Comment.Shape.TextFrame
.Characters.Font.Name = "Comic Sans MS"
.Characters.Font.Size = 14
.Characters.Font.Bold = False
.AutoSize = True
End With
Next
End Sub
Von Heri
Gruß Georg
beispiel:
Range("B3").Select
Range("B3").Comment.Text Text:="Kommentar:"
Selection.ShapeRange.ScaleWidth 1.88, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 2.2, msoFalse, msoScaleFromTopLeft
Gruß
Steffen D