Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

VBA - hat Zelle einen Kommentar?

545 views
Skip to first unread message

uli

unread,
Dec 27, 2007, 8:40:01 AM12/27/07
to
Hallo NG,

ich kann mit VBA einer Zelle einen comment hinzufügen. (Addcomment).

Leider kann ich bisher nicht prüfen, ob die betrefffende Zelle bereits über
einen Kommentar verfügt. Dann gibt's mit addcomment eine Fehlermeldung.

Wer weiss, wie ich das prüfen kann?

--
uli

Carlos Naplos

unread,
Dec 27, 2007, 9:12:08 AM12/27/07
to
uli schrieb:
ActiveCell.NoteText zeigt den Kommentar.

Sub TestNoteText()
If ActiveCell.NoteText = "" Then
ActiveCell.NoteText "Dies ist ein neuer Kommentar"
Else
MsgBox "Kommentar: " & ActiveCell.NoteText
End If
End Sub

Thomas Ramel

unread,
Dec 27, 2007, 11:08:47 AM12/27/07
to
Grüezi uli

uli schrieb am 27.12.2007

Du kannst dies z.B. wie folgt tun:


If Not Range("A1").Comment Is Nothing Then

'Code für Kommentar vorhanden

End If

Mit freundlichen Grüssen
Thomas Ramel

--
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2003 SP-2]
Microsoft Excel - Die ExpertenTipps

0 new messages