Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1468to1472
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

Tabelle mit Variablen Dateiname

Tabelle mit Variablen Dateiname
21.01.2016 17:44:55
Nicolai
Hallo zusammen,
ich möchte gerne ein Makro was mich beim ausführen fragt aus welcher Datei(Variabler Dateiname aber gleicher Pfad) ich eine festgelegte Range(Tabellenblatt1 A1:C20) kopiere und in meine geöffnete Tabelle rein schreiben soll.
Ich hoffe ich habe mich einigermaßen verständlich ausgedrückt und vielen Dank im voraus.
Viele Grüße
Nicolai

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle mit Variablen Dateiname
22.01.2016 13:18:45
ChrisL
Hi Nicolai
Sub t()
Dim WB1 As Workbook, WB2 As Workbook
Dim varDatei As Variant
Application.ScreenUpdating = False
Set WB1 = ThisWorkbook
varDatei = Application.GetOpenFilename("Excel Datei (*.xlsx), *.xlsx", , "Datei auswählen", ,  _
False)
If varDatei  False Then
Set WB2 = Workbooks.Open(varDatei)
Else
Exit Sub
End If
WB2.Worksheets(1).Range("A1:C20").Copy WB1.Worksheets(1).Range("A1")
WB2.Close
Application.ScreenUpdating = True
End Sub

cu
Chris
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige