Forums Neueste Beiträge
 

Alle Kommentare mit VBA Eigenschaften geben

09/07/2008 - 14:35 von Walter Heying | Report spam
Hallo,

ich habe folgendes Problem: Bedingt durch viele Kommentare, die die
Eigenschaft haben "von Zellgröße und -position unabhàngig" kann
Spalten nicht ausblenden. Wie lautet der VBA-Code, um dieses für alle
Kommentare zu àndern, also auf ".Placement = xlMoveAndSize" zu setzen?

Gruß
Walter
 

Lesen sie die antworten

#1 Wolfgang Habernoll
09/07/2008 - 16:00 | Warnen spam
Hallo Walter
"Walter Heying" schrieb im Newsbeitrag
news:
Hallo,

ich habe folgendes Problem: Bedingt durch viele Kommentare, die die
Eigenschaft haben "von Zellgröße und -position unabhàngig" kann
Spalten nicht ausblenden. Wie lautet der VBA-Code, um dieses für alle
Kommentare zu àndern, also auf ".Placement = xlMoveAndSize" zu setzen?



versuche es mal damit

Sub KommentarEigenschaftAendern()
Dim rngComments As Range
Dim rngI As Range
On Error GoTo KeinFund
Set rngComments = ActiveSheet.Cells.SpecialCells(xlCellTypeComments)
For Each rngI In rngComments
rngI.Comment.Shape.Placement = xlMoveAndSize
Next
KeinFund:
End Sub

mfG
Wolfgang Habernoll

[ Win XP Home SP-2 , XL2002 ]

Ähnliche fragen