Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

nochmals UserForm

nochmals UserForm
19.03.2003 19:15:22
Heiko
Hi,
habe noch mal eine Frage dazu. Wie im letzten Beitrag hat Bernd mir sehr geholfen. Wie kann ich diesen Code jetzt nicht nur für die Zelle A sondern für die aktive Zelle umstellen?
Original Code:
Private Sub CommandButton1_Click()
Range("A1").AddComment UserForm1.TextBox1.Value
End Sub

mein Versuch:
Private Sub CommandButton1_Click()
ActiveCell.AddComment UserForm1.TextBox1.Value
End Sub
geht aber nicht so.
Heiko


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: nochmals UserForm
19.03.2003 19:47:15
Knut

Option Explicit
Private Sub CommandButton1_Click()
Dim aC As Range
Set aC = ActiveCell
aC.AddComment
aC.Comment.Text Text:=TextBox1.Text
End Sub
Knut

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige