VBA – Zellenkommentare hinzufügen oder entfernen
In this Article
Dieses Tutorial zeigt Ihnen, wie Sie mit Zellenkommentaren in VBA arbeiten können.
Die folgenden Codeabschnitte zeigen Ihnen, wie Sie einen Kommentar in einer Zelle hinzufügen oder löschen können.
Zellenkommentar mit VBA hinzufügen
1. Fügen Sie den folgenden Code irgendwo in Ihr Makro ein, um einen Kommentar hinzuzufügen:
Tabelle1.Range("A1").AddComment ("Hallo Welt")
Zellenkommentar mit VBA löschen
2. Um einen Kommentar zu löschen, verwenden Sie den folgenden Code:
Tabelle1.Range("A1").Comment.Delete
Zellenkommentar mit VBA bearbeiten
3. Um einen Kommentar in einer bestimmten Zelle zu bearbeiten, müssen Sie den vorhandenen Kommentar lesen und ihn anschließend ändern. Verwenden Sie den folgenden Code:
Dim AlterKommentar As Variant
Dim NeuerKommentar As Variant
AlterKommentar = Tabelle1.Range("A1").Comment.Text
NeuerKommentar = AlterKommentar & " (Bearbeiteter Kommentar)"
Tabelle1.Range("A1").Comment.Delete
Tabelle1.Range("A1").AddComment (NeuerKommentar)
Zunächst müssen Sie den vorhandenen Kommentar lesen und in der Variablen AlterKommentar speichern.
Danach können Sie den Kommentar bearbeiten, z. B. den neuen Text zum bestehenden hinzufügen und das Ganze in der Variablen NeuerKommentar speichern.
Nun müssen Sie den alten Kommentar löschen und den neuen hinzufügen. Um den Kommentar zu löschen, müssen Sie den Befehl .Comment.Delete verwenden.
Schließlich können Sie den Kommentar aus der Variablen NeuerKommentar mit dem Befehl .AddComent hinzufügen.
VBA-Programmierung leicht gemacht
Suchen Sie nicht länger online nach VBA-Code. Erfahren Sie mehr über AutoMacro – einen VBA Code Builder, der es Anfängern ermöglicht, Prozeduren von Grund auf mit minimalen Programmierkenntnissen und mit vielen zeitsparenden Funktionen für alle Benutzer zu programmieren!
VBA Coding Made Easy
Stop searching for VBA code online. Learn more about AutoMacro - A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!Learn More!