Supportnet / Forum / Tabellenkalkulation
In UserForm1 TextBox1 anzeigen
Frage
Hallo zusammen,
ich häge an einem kleinem Problem.
Wie kann ich beim Aufrufen der UserForm1 in der sich die
TextBox1 befindet die aktivierte Zelle der Tabelle1
anzeigen lasen. Aktivierte Zelle ist z.B.A1 und eingetragen ist z.B.JOJA.
Kann mir hier jemand Helfen wäre sehr nett.
DANKE
mfg.
JOJA
Antwort 1 von martl
Hallo Joja,
hab da folgenden Vorschlag: Leg in Deinem Excelblatt eine Befehlsschaltfläche an (befindet sich in der Symbolleiste Steuerelement-Toolbox). Dann musst Du in den Entwurfsmodus wechseln (in der Symbolleiste: Visual-Basic). Mit Doppelclick auf die Befehlsschaltfläche kommst Du dann in die Entwicklungsumgebung. Dort musst Du dann in der Tabelle1 (oder dort, wo sich dein Button befindet, die UserForm mit der Textbox anlegen und folgenden Code eingeben:
Option Explicit
Private Sub CommandButton1_Click()
UserForm1.TextBox1.Value = Range("A1").Value
UserForm1.Show
End Sub
Nachdem der Code eingefügt ist, wieder in das Excelblatt und den Entwurfsmodus beenden. Beim Click auf den Button wird die Zelle A1 ausgelesen und in die danach geöffnete UserForm übertragen.
Wenns nicht funktioniert, nochmals melden.
Gruß
martl
hab da folgenden Vorschlag: Leg in Deinem Excelblatt eine Befehlsschaltfläche an (befindet sich in der Symbolleiste Steuerelement-Toolbox). Dann musst Du in den Entwurfsmodus wechseln (in der Symbolleiste: Visual-Basic). Mit Doppelclick auf die Befehlsschaltfläche kommst Du dann in die Entwicklungsumgebung. Dort musst Du dann in der Tabelle1 (oder dort, wo sich dein Button befindet, die UserForm mit der Textbox anlegen und folgenden Code eingeben:
Option Explicit
Private Sub CommandButton1_Click()
UserForm1.TextBox1.Value = Range("A1").Value
UserForm1.Show
End Sub
Nachdem der Code eingefügt ist, wieder in das Excelblatt und den Entwurfsmodus beenden. Beim Click auf den Button wird die Zelle A1 ausgelesen und in die danach geöffnete UserForm übertragen.
Wenns nicht funktioniert, nochmals melden.
Gruß
martl