habe folgenden Code
Private Sub cmdSaveComment_Click()
Dim strBereich As Variant
Me.TextBox1 = Selection.Address
strBereich = Right(Me.TextBox1, 4)
Sheets("ALT 1").Range(strBereich).AddComment Me.txtComment
End Sub
Ich habe einen Bereich, z.B.: $B$6:$B$10 markiert. Es öffnet sich automatisch meine Userform und trage in meine Textbox den Kommentar ein und möchte nun mit o.a. Code einen Kommentar in der letzten markierten Zelle haben.
Die letzte markierte Zelle wird auch richtig ausgelesen, aber dennoch funkt es nicht... was mache ich falsch?
Danke
Jack