Hallo Gemeinschaft.
leider stehe ich gerade ziemlich auf dem Schlauch:
Das Problem: Ich möchte bei Auswahl in der aktiven Zeile in Spalte A ein Threaded Kommentar hinzufügen.
Das Programm soll prüfen ob schon eins vorhanden ist, wenn ja soll es als AddReply hinzugefügt werden.
Leider bekomme ich folgende Fehlermeldung: Laufzeitfehler 91. Objekvariable oder Woth-Blockvariable nicht festgelegt
Kann mir bitte jemand sagen was ich falsch mache, folgend der Code-Ausschnitt:
If Cells(Selection.Row, 1).CommentThreaded.Text <> "" Then
Cells(Selection.Row, 1).CommentThreaded.AddReply ("Adresse falsch")
Else
Cells(Selection.Row, 1).AddCommentThreaded ("Adresse falsch")
End If
Ich danke euch im Voraus.
LG Bobby
|