Daten aus über Explorer gewählter Datei kopieren

Computer: Software & Programmierung Visual Basic
#1

Hi Zusammen,

ich wollte Euch VBA-Cracks mal fragen wie ich Daten aus einer Exceldatei x in meine aktuell geöffnete Exceldatei einfüge.

Gewünscht ist das ich auf einen Button in der Datei y klicke und sich der Explorer offnet. Im Explorer möchte ich dann die Datei x wählen woraus ich die Daten der Zellen A1:C5 kopiere. Die kopierten Daten sollen nun in die Zellen E2:G6 der Datei y (wo sich der Button befindet) eingefügt werden. Danach soll sich die Datei x wieder schließen!

Den folgenden Code habe ich schon hinbekommen. Allerdings werden hier nur die Daten in einer ganz bestimmten Datei kopiert.
Wie bekomme ich es hin das ich nun die Datei über den Explorer wähle woraus die Daten kopiert werden soll:

Workbooks.Open Filename:=„C:\Users\Benutzer\Documents\Mappe2.xlsx“
Range(„A1:A2“).Select
Selection.Copy
Windows(„Mappe1“).Activate
Range(„A1“).Select
ActiveSheet.Paste
Windows(„Mappe2.xlsx“).Activate
Windows(„Mappe1“).Activate
Windows(„Mappe2.xlsx“).Activate
Application.CutCopyMode = False
ActiveWindow.Close

Wär echt super wenn Ihr mir helfen könntet!

Ich danke im Voraus!

#2

Gewünscht ist das ich auf einen Button in der Datei y klicke
und sich der Explorer offnet. Im Explorer möchte ich dann die
Datei x wählen woraus ich die Daten der Zellen A1:C5 kopiere.

Hallo r…,

immerhin, du hast deine Excelversion angegeben, wenn auch nicht so deutlich wie es in die hiesige Brettbeschreibung gemeißelt ist.
Frag nach wenn du nicht weißt wie man zur Brettbeschreibung gelangt *gg*

Muß denn der Explorer sein?
Langt da nicht ein Kombinationsfeld in dem alle Excel-Dateien aus
„C:\Users\Benutzer\Documents“
aufgelistet sind?

Gruß
Reinhard