Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Zellen auf Kommentar überprüfen

Gruppe

Kommentar

Problem

Wie kann ich die Zellen eines ausgewählten Bereiches überprüfen, ob sie einen Kommentar enthalten und wenn ja, diesen ändern?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

ClassModule: Tabelle1

Private Sub cmdComment_Click()
    Dim rng As Range
    For Each rng In Selection
        If Not rng.Comment Is Nothing Then
            rng.NoteText "Hallo!"
        End If
    Next rng
End Sub