Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1664to1668
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1664to1668
1664to1668
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Textboxen Wert zuweisen

Userform Textboxen Wert zuweisen
03.01.2019 15:16:37
walter
Guten Tag,
erst mal wünsche ich allen ein gesundes neues Jahr !!!
Ich habe eine Userform, anbei Muster, das habe ich auch aus dem Forum
zusammengesetzt.
Wenn es möglich ist, möchte ich gern die Werte der Textboxen in der UF
mit den Werten der aus der Tabelle ändern, ohne jetzt 20 Textboxen-Makros zu
erstellen.
Die Werte sollen automatisch eingelesen werden und das ändern in einer
beliebigen Textbox sollte dann in der richtigen Zelle erfolgen.
Also ändere ich den Wert in der Textbox 3 den Wert, sollte dann der
Wert in der aktiven Tabelle C6 geändert werden.
GEHT sowas ?
https://www.herber.de/bbs/user/126463.xlsm
mfg
walter b

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform Textboxen Wert zuweisen
03.01.2019 15:36:04
ede
Hallo Walter,
ja da geht, du musst dann die Werte zum Beispiel beim Schliessen der Userform zurück in das Sheet schreiben, bzw. beim Wechseln der Sheets!
gruss
ede 

Private Sub CommandButton2_Click()
ActiveSheet.Range("C4") = TextBox1
ActiveSheet.Range("C5") = TextBox2
'usw...
Unload Me
End Sub

Hallo Ede...
03.01.2019 15:56:08
walter
Hallo Ede,
danke für die Info. Es sollte der Wert direkt in die aktive Tabelle
eingetragen werden.
mfg
walter b
AW: Userform Textboxen Wert zuweisen
03.01.2019 15:45:47
Daniel
Hi
geht ganz einfach und ohne Code:
Schreibe für jede Textbox in der Eigenschaftsliste in die Eigenschaft: Controlsource die Adresse der Zelle, mit der die Textbox verknüpft sein soll, am besten mit Tabellenblattnamen und Hochkommas: 'Tabelle1'!A1
die Textbox ist dann mit dieser Zelle vernknüft, dh der Zellwert wird automatisch in der Textbox angezeigt und der Zellwert wird geändert, wenn du die Textbox änderst.
Funktioniert alles automatisch ohne weiteren Code.
Die Textbox-änderung wird in die Zelle geschrieben, sobald du die Textbox verlässt.
Gruß Daniel
Anzeige
AW: Userform Textboxen Wert zuweisen
03.01.2019 15:54:07
walter
Hallo Daniel,
das geht doch nicht, wenn ich eine andere Tabelle aufrufe soll auch da
der Wert der aktiven Tabelle rein geschrieben werden.
mfg
walter b
AW: Userform Textboxen Wert zuweisen
03.01.2019 16:21:50
Daniel
Hi
dann musst du die Adresse im Click-Event der Listbox, mit dem du die Blattauswahl machst der Eigenschaft ControlSource zuweisen, dann wird die Vernküpfung beim Blattwechsel angepasst.
da du dich immer auf aktive Blatt beziehst, reicht die Angabe der Adresse.
Private Sub lstBlätter_Click()
'MsgBox lstBlätter.List(lstBlätter.ListIndex, 0)
Sheets(lstBlätter.ListIndex + 1).Activate
TextBox1.ControlSource = "C4"
TextBox2.ControlSource = "C5"
TextBox3.ControlSource = "C6"
usw...
End Sub
du musst dann zwar im Code einmal die Vernknüpfung herstellen, aber du sparst dir damit den Code für das Rückschreiben der Werte.
Gruß Daniel
Anzeige
Daniel klappt !!! -)
03.01.2019 16:28:14
walter
Hallo Daniel,
einwandfrei Danke !
mfg
walter b
AW: Daniel klappt ! - dann Frage nicht mehr offen
03.01.2019 16:42:00
Daniel
hast du genau gelesen, was neben dem Häkchen steht?
Gruß Daniel
Daniel, was meinst Du damit ?
04.01.2019 10:02:04
walter
Guten Morgen Daniel,
was meinst Du mit: "was neben dem Häkchen steht?"
mfg
walter b
AW: Daniel, was meinst Du damit ?
04.01.2019 13:31:43
Werner
Hallo Walter,
na vermutlich, dass du den Text mal lesen solltest. Da steht nämlich, dass man das Kästchen anhaken soll, wenn das Problem noch nicht gelöst ist. Dann wird der Beitrag in der Beitragsliste als noch offen, also ungelöst markiert.
Gruß Werner
Alles erledigt. --))
04.01.2019 16:30:16
walter

10 Forumthreads zu ähnlichen Themen

VBA: UserForm mit TextBoxen
Ernst Dunkel

In UserForm1 habe ich sechs TextBoxen mit gleich Code.
Wie muss ich die untenstehende Prozedur vereinfachen, so dass der Code für alle TextBoxen in UserForm 1 gilt, ohne die Prozedur 5 mal zu kopieren?
Private Sub TextBox1_KeyPress(ByVal KeyAscii As msforms.ReturnInteger)
Dim TMP$
19.07.2002 15:34:13
Thread-ID: 138550
11 Beiträge
Anzeige
VBA: Function in Userform Textbox
Bernd

Hallo zusammen,
Komme bei nachfolgendem Problem nicht weiter und bräuchte Eure Hilfe.
Also bei Verlassen derTextbox1 werden (siehe Code) über VLOOKUP die Werte die in die Textboxen eingelesen. D.h. ich suche folgenden Code sinngemäß: Nehme das Kürzel aus Textbox7 und steuere damit die F...
13.10.2017 09:15:44
Thread-ID: 1585661
8 Beiträge
VBA Userform: Suche via Textbox
Harald

Hallo zusammen,
ich arbeite momentan an einer Userform zur übersichtlichen Darstellung einer Projektdatenbank. Diese Datenbank besteht aus Projekten, die sich jeweils in unterschiedlichen Stadien befinden. Jedes Stadium hat dabei ein eigenes Tabellenblatt.
Bis jetzt läuft es mit der U...
18.01.2018 15:23:11
Thread-ID: 1603113
4 Beiträge
Anzeige
Excel VBA Userform Textbox in bestimmtes Format
Oliver

Hallo Leute,
ich bin am verzweifeln, weil ich seit 2 Tagen nicht zu einer Lösung komme.
Ich habe eine Userform, mit der ich eine Tabelle befülle. In der Userform habe ich eine TextBox in der immer ein bestimmtes Format vom User eingegeben werden soll.
Die Zeichenfolge beginnt mit ei...
21.09.2018 23:59:44
Thread-ID: 1647116
9 Beiträge
VBA Userform Textbox mit mehreren Zellen
Dominik

Hallo,
ich hoffe ihr könnt mir weiterhelfen. ich würde gerne eine userform erstellen mit kundendaten. in spalte a stehen die kunden nr. in spalte b vorname in spalte c nachname usw.. wenn ich jetzt ein doppelklick auf die kunden nr. mache, soll sich die userform öffnen und in der textbox1 s...
21.08.2019 19:36:20
Thread-ID: 1708887
3 Beiträge
Textboxen(1 to x) in Userform hinzufügen via VBA
Florian

Hallo zusammen,
ich möchte via VBA in mein UserForm neue Textboxen hinzufügen. Meine Idee sieht so aus, klappt aber nicht:Dim myTextBox(1 To 4) As TextBox
Dim i, j As Integer
For i = 1 To 100
If ComboBox5.Text = ActiveSheet.Cells(i, 5) Then
If ComboBox5.Text "" Then
For j = 1...
24.06.2003 15:58:28
Thread-ID: 272884
3 Beiträge
VBA Userform Textbox fehler
Rudi

Hallo
ich habe folgendes Problem! In einer Userform lasse ich mir Daten aus einer Tabelle anzeigen,
*TextBox1 = Format(Range("DatenInvestition!G32").Value, "#0")*
und schreibe die Daten auch wieder zurück.
*Worksheets("DatenInvestition").Range("G32") = CDbl(TextBox1)*
Pass...
14.07.2004 10:54:33
Thread-ID: 455027
3 Beiträge
VBA UserForm - Textbox Wert in Tabelle
Moritz

Hallo liebe Experten,
ich habe eine UserForm erstellt mit der ich gewisse Informationen in eine Tabelle übertragen möchte. Funktioniert auch alles soweit nur habe ich ein kleines Problem zu dem ich keine Lösung finde.
Die Werte, die ich in der UserForm in die verschiedenen Textboxen ein...
03.11.2020 14:01:26
Thread-ID: 1790889
3 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
10
1
7
3
2
8
2
2
2
2