für Profis sicher kein Problem
Wie läßt sich per VBA feststellen ob in einer Zelle ein Kommentar vorhanden ist.
bin für jeden Hinweis dankbar.
Arno
für Profis sicher kein Problem
Wie läßt sich per VBA feststellen ob in einer Zelle ein Kommentar vorhanden ist.
bin für jeden Hinweis dankbar.
Arno
vielleicht geht's einfacher, aber mir fällt nur folgendes ein:
Gruß
Martin Beck
da ich die Abfrage in eine Schleife einbaue wird die Error-Abfrage nur beim ersten Durchlauf durchgeführt.
Ich hatte an so etwas wie " If Cells(x, 5).coments = true" gedacht.
Trotzdem danke
Arno
etwas kürzer geht es so:
If Len(ActiveCell.NoteText) > 0 Then MsgBox "Kommentartext vorhanden"
Aber wie bei Martin, wird auch bei dieser Lösung nicht geprüft, ob ein leerer Kommentar vorliegt.
Andreas
hier ein verbesserter Code, die Schleife durchläuft in dem Beispiel die Zellen A1:A6.
Gruß
Martin Beck
P.S. Die Auflistung der Eigenschaften zum Range-Objekt zeigt keine Eigenschaft wie z.B. HasComment, sonst wäre es einfacher.