Kopieren über UserForm

Hallo zusammen,
leider hat meine Frage gestern zu Verwirrung geführt. Daher möchte ich es heute nochmal ausführlicher probieren. Hajo hat gestern viel Energie investiert (vielen Dank!), vielleicht kann heute jemand anderes helfen?
Ziel
1. Der User öffnet die entsprechende Excel-Datei (Datei1.xls).
2. Eine UserForm wird angezeigt.
3. In der UserForm kann der User eine beliebige Excel-Datei (z.B. von seiner Festplatte, z.B. Datei2.xls) auswählen.
4. Durch Klick auf den Button Kopieren wird von der vom User ausgewählten Excel-Datei (Datei2.xls) immer derselbe Bereich in die aktuelle Excel-Datei (Datei1.xls) kopiert (von Datei2.xls der Bereich B12:B25 aus Arbeitsblatt 2 nach Datei1.xls an die Stelle C12 in Arbeitsblatt 1).
Mein Umsetzungsvorschlag Siehe hier:

Die Datei https://www.herber.de/bbs/user/84344.xls wurde aus Datenschutzgründen gelöscht

1. Workbook, Open öffnet die User Form
2. Private Sub cmdDurchsuchen_Click() öffnet ein Feld zum Durchsuchen
...hier sterbe ich ab =(
Meine Fragen
Meine Code Versuche führen leider nur zu Fehlermeldungen. Wie setze ich weiter um...
3. Nach Auswahl der Datei sollte der Pfad in der User Form angezeigt werden
4. Beim Klicken auf den Button Kopieren soll aus der ausgewählten Datei (Datei2.xls) der Bereich B12:B25 aus Arbeitsblatt 2 in die Datei1.xls an die Stelle C12 in Arbeitsblatt 1 kopiert werden)
Könnt ihr bitte gleich die Datei nehmen, dann ist die Umsetzung glaub ich klarer.

Die Datei https://www.herber.de/bbs/user/84344.xls wurde aus Datenschutzgründen gelöscht

Lieben Dank!
Claudia

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

PS: Habe eigentlich Excel 2010. Die Datei soll aber bereits ab 2007 laufen.

Und lädst trotzdem eine 2003er Datei hoch?
Hintergrund: In meiner Version wird es mehrere Dateien geben aus denen ganz bestimmte Inhalte kopiert werden sollen. Der User wählt also erst die Dateien nacheinander aus und kopiert dann "alles mit einem Mal".
Einer der seltenen Fälle, in denen ich mich Hajo anschließe: Man kann Helfer vergraulen, indem man die Aufgabenstellung ständig ändert. Deine Aufgabe war: "Datei wählen, FIX vorgegebenen Bereich kopieren, per Button in Userform". Diese Aufgabe ist 100% von mir gelöst worden. Die Arbeit, die ich dafür investiert habe, ist für die Tonne.
Jetzt kommts du mit etwas völlig anderem um die Ecke, dass sowieso nicht funktionieren kann:
Sagen wir mal, der User wählt 10 Dateien aus (warum gabs in deiner Userform dafür nur eine Textbox?). Dann öffnet das Makro jede dieser 10 Dateien und kopiert aus jeder den Inhalt in die aktuelle Datei - jedesmal nach C12 (so deine Aufgabe!).
Jetzt frage ich mich, warum sollte ich überhaupt die ersten 9 Dateien öffnen wenn eh nur das Zeug aus der 10ten Datei übrig bleibt?
Claudia,
definiere mal deine Aufgabe vollständig und verständlich. Meine Frage nach den Tabellen im Zielblatt zB hast du immer noch nicht beantwortet.
Vielleicht hilft dir dann wieder jemand.
Oder bastel damit selbst rum. Alles nötige hast du.
GetFile() gibt dir einen kompletten Pfad zurück,
FileCheckOpen(sPath As String) öffnet dir eine Datei
Private Sub cmdKopieren_Click() kopiert rüber.
Der Rest ist eh nur Fleißarbeit (rufe 10mal GetFile auf, schreibe die Ergebnisse wohin-auch-immer, rufe 10 mal FileCheckOpen mit spath = wohin-auch-immer auf, kopiere die Bereiche die du brauchst).
Grüße,
Klaus M.vdT.

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Kopieren über UserForm

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread