ich möchte den Inhalt aus Tabelle3 Zelle A1 und Tabelle1 Zelle B2 je in einem Textfeld in einer Userform darstellen.
Geht das ???
Danke Stefanie
ich möchte den Inhalt aus Tabelle3 Zelle A1 und Tabelle1 Zelle B2 je in einem Textfeld in einer Userform darstellen.
Geht das ???
Danke Stefanie
ja, das geht.
Im Klassenmodul der Userform:
Private Sub UserForm_Initialize()
TextBox1.Text = Worksheets("Tabelle3").Range("A1").Value
TextBox2.Text = Worksheets("Tabelle1").Range("B2").Value
End Sub
Gruß
Ingo
Hinterlege den Code entweder der Initialisierung der Userform oder einer Schaltfläche:
Me.Textbox1.Value = Worksheets("Tabelle3").Range("A1")
Me.Textbox2.Value = Worksheets("Tabelle1").Range("B2")
Gruss Rainer
Hinterlege den Code entweder der Initialisierung der Userform oder einer Schaltfläche:
Me.Textbox1.Value = Worksheets("Tabelle3").Range("A1")
Me.Textbox2.Value = Worksheets("Tabelle1").Range("B2")
Gruss Rainer
lege 2 Textfelder und einen Button an. Nach Doppelklick auf den Button gibts du folgenden Code ein:
Private Sub CommandButton1_Click()
Dim frm
Set frm = UserForm1
With frm
.TextBox1.Value = Sheets("Tabelle3").Range("a1").Value
.TextBox2.Value = Sheets("Tabelle1").Range("b2").Value
End With
End Sub
Müßte funktionieren.
Gruß Michi
Danke an Alle die mir Geholfen haben !!!
Und einen schönen 1. Advent
Eure Stefanie
noch eine Sache wenn sich die Inhalte der Felder ändert, soll dies Automatisch in den Textfelder darstellt werden. Ferner geht die Sache auch ohne Button, so Automatisch ???.
Stefanie
Um den Inhalt einer Zelle in einer Excel Userform anzuzeigen, befolge diese Schritte:
Erstelle eine Userform:
Füge Textfelder hinzu:
Füge den Code hinzu:
Private Sub UserForm_Initialize()
TextBox1.Text = Worksheets("Tabelle3").Range("A1").Value
TextBox2.Text = Worksheets("Tabelle1").Range("B2").Value
End Sub
Userform anzeigen:
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Fehler: „Laufzeitfehler 9: Index außerhalb des gültigen Bereichs“.
Fehler: Textfelder zeigen keinen Inhalt an.
UserForm_Initialize
-Ereignis korrekt ist und dass die Zellen in den Arbeitsblättern tatsächlich Werte enthalten.Wenn du den Inhalt einer Zelle dynamisch aktualisieren möchtest, ohne einen Button zu verwenden, kannst du den folgenden Code verwenden:
Füge diesen Code im Modul der Userform ein:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Worksheets("Tabelle3").Range("A1")) Is Nothing Then
TextBox1.Value = Worksheets("Tabelle3").Range("A1").Value
End If
If Not Intersect(Target, Worksheets("Tabelle1").Range("B2")) Is Nothing Then
TextBox2.Value = Worksheets("Tabelle1").Range("B2").Value
End If
End Sub
Diese Methode aktualisiert die Textfelder automatisch, wenn sich der Inhalt der Zellen ändert.
Angenommen, du möchtest den Inhalt aus Zelle A1 von „Tabelle3“ und B2 von „Tabelle1“ in einer Userform anzeigen. Hier ist ein Beispiel:
Private Sub UserForm_Initialize()
TextBox1.Text = Worksheets("Tabelle3").Range("A1").Value
TextBox2.Text = Worksheets("Tabelle1").Range("B2").Value
End Sub
Verwende die Methode, die am besten zu deinem Projekt passt.
Verwende die richtige Excel-Version: Achte darauf, dass du eine aktuelle Excel-Version verwendest, um alle Funktionen nutzen zu können.
Fehlerbehandlung einfügen: Implementiere On Error
-Anweisungen, um möglichen Laufzeitfehlern vorzubeugen.
Design anpassen: Gestalte die Userform ansprechend, indem du die Farben und Schriftarten anpasst.
1. Wie kann ich den Inhalt einer Zelle in einem Textfeld anzeigen? Du kannst den Inhalt einer Zelle in einem Textfeld anzeigen, indem du den Wert der Zelle in das Textfeld schreibst, wie im obigen Code gezeigt.
2. Funktioniert das in allen Excel-Versionen? Ja, die grundlegenden Techniken für Userforms und Textfelder sind in den meisten Excel-Versionen verfügbar, jedoch können einige spezifische Funktionen variieren.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen