Kommentar einer Zelle erkennen

Computer: Software & Programmierung Visual Basic
#1

Hallo

ich erzeuge einen Kommentar einer Zelle mit z.B. „Cells(1,1).AddComment“ und schreibe einen Text hinein.

In einer weiteren Routine lese ich mehrer Zellen (auch Cells(1,1)) hinsichtlich ihres Kommentares mit „Cells(x,y).Comment.Text“, was prima klappt.

Hat eine der Zellen aber keinen Kommentar, gibt es eine Fehlermeldung bei der Anwendung von „Cells(x,y).Comment.Text“. Der Debugger zeigt mir dann in der Überwachung den Wert von „Cells(x,y).Comment“ als „nothing“ an.

Die Frage nach „if Cells(x,y).Comment = nothing“ akzeptiert der Compiler nicht.

Durch welche Anweisung erkenne ich, ob eine Zelle einen Kommentar hat oder nicht.

Danke für Antworten
Volker

#2

Grüezi Volker

ich erzeuge einen Kommentar einer Zelle mit z.B.
„Cells(1,1).AddComment“ und schreibe einen Text hinein.

In einer weiteren Routine lese ich mehrer Zellen (auch
Cells(1,1)) hinsichtlich ihres Kommentares mit
„Cells(x,y).Comment.Text“, was prima klappt.

Die Frage nach „if Cells(x,y).Comment = nothing“ akzeptiert
der Compiler nicht.

Durch welche Anweisung erkenne ich, ob eine Zelle einen
Kommentar hat oder nicht.

Die Abfrage auf Nothing erfolgt nicht mit einem Vergleich sondern mit dem Schlüsselwort ‚Is‘

Ich mache dies dann in der Regel wie folgt:

If Not Cells(x,y).Comment Is Nothing Then

–
Mit freundlichen Grüssen

Thomas Ramel

  • MVP für MS-Excel -If Not .Comment Is Nothing Then