Kommentar über Userform mit Textfeld einfügen
21.11.2002 11:18:45
Patrik Pekrul
ich habe folgendes Problem: Ich habe eine einfaches Formular mit einem Textfeld und einem OK-Knopf erstellt. Der Benutzer soll hier einen Kommentar für die aktive Zelle eingeben. Beim drücken auf den "OK"-Knopf soll der Kommentar dann dort erscheinen. Das tut er auch, aber ich kriege gleichzeitig eine 1004-Fehlermeldung. Woran liegts?
Progamm-Code:
Private Sub OK_Click()
kommentartext = kommentar.Kommentarfeld.Text
ActiveCell.AddComment (kommentartext) 'Mit dieser Zeile gibt es ein Problem
kommentar.Hide
End Sub