Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1196to1200
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
1196to1200
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro - Daten aus anderer xls kopieren

Makro - Daten aus anderer xls kopieren
Julia
Ich mal wieder :)
Ich bräuchte ein Makro zum Datenimport :)
Ausgangslage:
In meinem Ordner habe ich 2 xls-Dateien.
Eine reporting.xls und eine input.xls
Das Makro soll in der reporting.xls gestartet werden.
Aufgaben des Makro:
1.) Reporting.xls ist geöffnet. Aus ihr wird das Makro gestartet.
2.) Öffne die Datei input.xls (ohne absolute Pfadangabe, input.xls und reporting.xls werden immer im selben Ordner liegen)
3.) Kopiere alles aus input.xls (Sheet: Data)
4.) Das kopierte im Sheet Report der Datei reporting.xls einfügen. Achtug! : Nicht einfach einfügen. Sondern über "Inhalt einfügen, nur Werte"
5.) Schließe input.xls ohne speichern
6.) MsgBox in der reporting.xls. Import war erfolgreich!
Kann mir jemand helfen?

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
noch ein Zusatz
04.02.2011 14:16:30
Julia
Der aller erste Schritt vom Makro:
Lösche im Shet Report der reporting.xls ALLES
Alle Zellen löschen!
AW: noch ein Zusatz
04.02.2011 14:28:30
Rudi
Hallo,
in ein Modul (ungetestet): 
Sub Julia()
Dim wks As Worksheet
Set wks = Workbooks.Open(ThisWorkbook.Path & "\input.xls").Sheets("Data")
wks.Cells.Copy
With ThisWorkbook.Sheets("Report")
.Cells.Clear
.Cells(1, 1).PasteSpecial xlPasteValues
End With
Application.CutCopyMode = False
wks.Parent.Close False
MsgBox "Fettich!", vbOKOnly + vbInformation, "Gebe bekannt"
End Sub

Gruß
Rudi
Fehlermeldung
04.02.2011 14:32:10
Julia
erst mal danke für das Makro.
bekomme folgende Meldung:
Laufzeitfehler 1004
Die PasteSpecial-Methode des Ranges-Objektes konnte nicht ausgeführt werden
Anzeige
AW: Fehlermeldung
04.02.2011 14:36:42
Reinhard
Hallo Julia,
ungetestet,
schreib mal anfangs der With-Schleife ein
.Activate
Gruß
Reinhard
Fehlermeldung?
04.02.2011 14:40:00
Julia
Versteh nicht ganz an welcher Stele du meinst.
Nachtrag
04.02.2011 14:42:59
Julia
debugger meckert an dieser Stelle:
.Cells(1, 1).PasteSpecial xlPasteValues
Das löschen zuvor hat geklappt
jemand zufällig einen Tipp :)
04.02.2011 15:26:54
Julia
jemand zufällig einen Tipp :)
es geht
04.02.2011 15:43:04
Julia
Habs rausgefunden:
wenn ich die Passage
.Cells.Clear
lösche
Dann geht es. Vielleicht stört das löschen beim kopieren?
Reihenfolge der Befehle!
04.02.2011 15:44:29
Renee
Hi, 
Sub Julia()
Dim wks As Worksheet
Set wks = Workbooks.Open(ThisWorkbook.Path & "\TmpImport.xls").Sheets("Data")
With ThisWorkbook.Sheets("Report")
.Cells.Clear
wks.Cells.Copy
.Cells(1, 1).PasteSpecial Paste:=xlPasteValues
End With
wks.Parent.Close False
Application.CutCopyMode = False
MsgBox "Fettich!", vbOKOnly + vbInformation, "Gebe bekannt"
End Sub

GreetZ Renée
Anzeige

300 Forumthreads zu ähnlichen Themen

Gültigkeitsprüfung in Bezug auf andere Zelle
Erwin

Geschätztes Forum!
Ich möchte in Zelle A1 eine Gültigkeitsprüfung einfügen.
Die Gültigkeit soll mir dort Eingaben bis zur Höchstzahl der in A2 vorhandenen Zahl erlauben.
zB. Wenn in A2 die Zahl 5 steht, soll die Eingabe in A1 bis höchstens bis zur Zahl 5 (also 1,2,3,4,5) erlaubt sei...
14.08.2008 14:06:00
Thread-ID: 1001854
5 Beiträge
Anzeige
Kombinationsfelder mit Daten aus anderer Tabelle
Bernhard

Hallo liebe Freunde,
ich brauche wieder einmal Eure Hilfe beim Umstricken eines VBA Codes, den ich hier im Archiv gefunden habe.
Die Userform hat u.a. 2 Kombinationsfelder, die mit den Daten aus den Spalten B bzw. C gefüllt werden. Wenn ich die Auswahl in Kombi1 treffe, wird Kombi2 glei...
25.08.2008 15:48:18
Thread-ID: 1004492
8 Beiträge
auf anderes sub zugreifen
Lars

Hallo,
ich möchte gerne eine Standardprozedur im sub "A" definieren, und es in anderen subs (z.B. "B") aufrufen, so dass es ausgeführt wird. Anschließend geht es in sub "B" weiter. Wie funktioniert das?
Danke
Gruß
Lars
03.09.2008 15:35:00
Thread-ID: 1007127
12 Beiträge
Anzeige
Laufende Nummer aus anderer Datei ziehen
mtremer

Hallo Excel-Freunde,
nun habe ich schon länger recherchiert, aber gefunden habe ich nichts :-(
Folgendes habe ich vor:
Ich befinde mich in einer Datei (Start.xls). Von dort aus möchte ich eine laufende Nummer aus einer anderen Datei (Sammlung.xls) ziehen. Diese Nummer befindet sich...
17.09.2008 11:55:00
Thread-ID: 1010315
4 Beiträge
Daten aus verschiedenen Dateien *HILFE*
Uwe

Guten Morgen
ich habe folgende Datei:
https://www.herber.de/bbs/user/55730.zip
ich umreiße kurz die Funktion, sowie den aktuellen Fehler:
Geschäftsablauf sieht folgendermaßen aus:
Kunde bestellt bei uns ein Produkt, welches der Vertrieb mit den vorliegenden Fahrzeugdaten -...
30.09.2008 08:16:45
Thread-ID: 1013242
7 Beiträge
Hyperlink soll je nach KW auf andere Datei verw.
Alex

Hallo,
gleich einmal vorweg, ich bin neu im Forum und hoffe, dass ihr mir bei meinem kleinen Hyperlink- Problem helfen könnt.
Folgende Aufgabe sollte gelöst werden.
Ich möchte einen Hyperlink einrichten, der automatisch je nach Kalenderwoche auf das entsprechende Bestellformular ve...
11.10.2008 12:37:00
Thread-ID: 1015732
3 Beiträge
Daten aus einer anderen Mappe auslesen
Uwe

Hallo zusammen, habe mir einen funktionierenden Einsatzplan für 24 MA und 3 Schichten zusammengebastelt welcher die Monate inkl. Feiertage und Wochenenden dynamisch generiert.
Nun möchte ich wenn ich im zum Beispiel den Einsatzplan für die Mitarbeiter für Februar abrechne, das Excel sich...
14.10.2008 22:12:36
Thread-ID: 1016451
5 Beiträge
Datenimport, Zahlen aus .txt Datei
Tom

Hallo zusammen,
benötige mal wieder Euer Fachwissen.
Es geht um eine .txt-Datei mit 100.000 Zahlen a 13 Stellen, diese möchte ich in Excel importieren.
Hierzu nutze ich in Excel Daten_ Externe Daten importieren, funktioniert auch gut, nur das nicht alle Zahlen in ein Tabelleblatt pa...
20.10.2008 19:30:14
Thread-ID: 1017788
2 Beiträge
Anzeige

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
4
1
7
11
6
3
6
2
4
1
5
3
1
2
1
7
4
8
10
4
3
3
17
6
2