Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1508to1512
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
Inhaltsverzeichnis

Daten aus Userform über xltm an xlsm

Daten aus Userform über xltm an xlsm
17.08.2016 01:21:09
Aaron
Guten Morgen zusammen,
leider stoße ich mit meinen VBA Kenntnissen wieder an meine Grenzen und hoffe, dass mir hier jemand weiterhelfen kann.
Ich habe einer Userform, über welche ich Daten in eine XLTM-Datei übertrage.
Diese XLTM öffnet sich und macht eine XLSM mit laufender Nummer draus.
Mit folgendem Code übertrage ich die Daten:

'Datei im verborgenen öffnen
Application.ScreenUpdating = True
'Speichern in anderer Datei (Datei öffnen)
Workbooks.Open filename:= _
"C:\Users\XXXXXX\Desktop\TEST-Datei.xltm"
'Die Werte übergeben:
Workbooks("TEST-Datei.xlsm").Sheets("Tabelle1").Range("B9") = TextBox01.Value

Wenn ich es richtig verstanden habe, dann muss zwischen dem Dateinamen und der Dateiendung eine Variable für die laufende Nummer.
Aber funktioniert das?
Wäre klasse, wenn mir jemand eine Anwort hat. :)
Vielen Dank im Voraus.
Gruß
Aaron

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten aus Userform über xltm an xlsm
17.08.2016 08:27:06
ChrisL
Hi Aaron
Gleich beim Öffnen übergibst du an eine Variable. Sinngemäss...
Private Sub CommandButton1_Click()
Dim WB1 As Workbook, WB2 As Workbook
Set WB1 = ThisWorkbook
Set WB2 = Workbooks.Open("C:\Users\XXXXXX\Desktop\TEST-Datei.xltm")
WB2.Sheets("Tabelle1").Range("B9") = TextBox01.Value
End Sub

cu
Chris
AW: Daten aus Userform über xltm an xlsm
17.08.2016 09:24:30
Aaron
Hi Chris,
PERFEKT!
Vielen Dank für deine schnelle Hilfe. :)
Das klappt hervorragend.
Ich wünsche einen schönen Tag und ein schnelles Gipfelfest. :)
Gruß
Aaron
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige