Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1480to1484
1480to1484
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellarray aus anderer, offener Mappe kopieren

Forumthread: Zellarray aus anderer, offener Mappe kopieren

Zellarray aus anderer, offener Mappe kopieren
14.03.2016 13:45:55
Roger
Hallo alle zusammen,
für eine Auswertung möchte ich aus einer bereits offenen Mappe einen Zellbereich kopieren, bekomme aber den Laufzeitfehler '1004' [Anwendungs- oder objektorientierter Fehler] für folgende Zeile:
wkbQuellMappe.Sheets(strQuellSheet).Range(Cells(7, 1), Cells(22, 1)).Copy
bzw. in der Schleifenversion:
wkbQuellMappe.Sheets(strQuellSheet).Range(Cells(7, lngLaufSpalteLog), Cells(lngMaxZeileLog, lngLaufSpalteLog)).Copy
Allerdings funktioniert folgende Zeile tadellos:
wkbQuellMappe.Sheets(strQuellSheet).Range("A7:A22").Copy
die ja den selben Bereich anspricht.
Kann mir da jemand mal schnell helfen, auf welchem Teilstück des Schlauches ich stehe ?
Vielen Dank

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellarray aus anderer, offener Mappe kopieren
14.03.2016 13:51:42
ChrisL
Hi Roger
Bei Cells fehlen die Angaben zum Sheet.
With wkbQuellMappe.Sheets(strQuellSheet)
.Range(.Cells(7, lngLaufSpalteLog), .Cells(lngMaxZeileLog, lngLaufSpalteLog)).Copy
End With
cu
Chris

AW: Zellarray aus anderer, offener Mappe kopieren
14.03.2016 14:02:36
Roger
Hallo alle zusammen,
ich komm ja fast nicht mehr mit dem ausprobieren hinterher, aber es funktionieren alle Lösungsmöglichkeiten. Logisch, dass da die Referenzierung fehlte.
Hab mich wegen der Übersichtlichkeit für den With-Rahmen entschieden.
Vielen Dank allen zusammen, mal wieder viel dazugelernt !
P.S.: Muss mich wohl runterstufen, von "Gut" auf "Anfänger" ;)
- dachte eigentlich, ich wär zumindest nicht schlecht, da ich in der Firma bisher alle VBA-Probleme gelöst habe ;)

Anzeige
AW: Zellarray aus anderer, offener Mappe kopieren
14.03.2016 13:54:00
selli
hallo roger,
die "cells" in deiner mappe benötigen ein übergeordnetes objekt.
also:
wkbQuellMappe.Sheets(strQuellSheet).Range(Sheets(strQuellSheet).Cells(7, 1),Sheets(strQuellSheet).Cells(22, 1)).Copy
gruß
selli

rudi hat hier natürlich recht, ich hatte....
14.03.2016 13:55:41
selli
...ja auch noch die betreffende mappe vergessen.
gruß
selli

Anzeige
Referenzierung mangelhaft
14.03.2016 13:54:07
Rudi
Hallo,
wkbQuellMappe.Sheets(strQuellSheet).Range(wkbQuellMappe.Sheets(strQuellSheet).Cells(7, 1), wkbQuellMappe.Sheets(strQuellSheet).Cells(22, 1)).Copy
Oder per With-Rahmen.
Gruß
Rudi

Standardfehler
14.03.2016 13:56:44
Daniel
Hi
du machst mal wieder den Standardfehler, den wohl jeder mal macht, der aber bei VBA-Gut eigentlich nicht mehr vorkommen sollte.
Es gilt:
Zellbezüge (Range, Cells, Columns, Rows) ohne Tabellenblattangabe davor beziehen sich immmer auf das aktive Tabellenblatt (oder wenn der Code in einem Tabellenblattmodul steht, auf das Modulblatt).
Das gilt auch, wenn die Zellbezüge innerhalb von Funktionen stehen wie bei Range(Cells(), Cells())
dh hier muss die Worksbook- und Worksheet-Angabe auch vor den beiden Cells stehen und nicht nur vor der Range. Ansonsten hast du das Problem, dass die Cells auf einem anderen Blatt liegen als die Range, die sie definieren sollen und das führt dann zum Fehler.
Weil der Code so schnell sehr unübersichtlich wird, sollte man auf Range(Cells(), Cells()) verzichten wenn auf ein anderes Workbook zugegriffen wird.
Übersichlicheren Code ergibt die WITH-Klammer:
WITH wkbQuellMappe.Sheets(strQuellSheet)
.Range(.Cells(7, 1), .Cells(22, 1)).Copy
end With

oder wenn WITH schon anderweitig verwendet wird, kann man den Zellbereich mit Resize angeben: 
wkbQuellMappe.Sheets(strQuellSheet).Cells(7, 1).Resize(16, 1).Copy
bzw in der Schleifenversion 
wkbQuellMappe.Sheets(strQuellSheet).Cells(7, lngLaufSpalteLog).Resize(lngMaxZeileLog - 7 + 1, 1).copy

Gruß Daniel

Anzeige
AW: Standardfehler
14.03.2016 14:07:55
Roger
Hallo alle zusammen,
ich komm ja fast nicht mehr mit dem ausprobieren hinterher, aber es funktionieren alle Lösungsmöglichkeiten. Logisch, dass da die Referenzierung fehlte.
Hab mich wegen der Übersichtlichkeit für den With-Rahmen entschieden.
Vielen Dank allen zusammen, mal wieder viel dazugelernt !
P.S.: Muss mich wohl runterstufen, von "Gut" auf "Anfänger" ;)
- dachte eigentlich, ich wär zumindest nicht schlecht, da ich in der Firma bisher alle VBA-Probleme gelöst habe ;)
Anzeige

Forumthreads zu verwandten Themen

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
Zeilen aus anderer datei kopieren
Dieter

Hi,
habe mal wieder ein schweres Problem:
ich möchte aus einer anderen Excel Date ein paar Zeilen kopieren. das Ganze soll folgendermassen funktionieren:
Quelldatei : "IMPORT.XLS
Tabellenblatt : "DATEN" oder "FPC"
Zieldatei : "EXPORT.XLS
Tabelnneblatt : "EINGABE"
so,...
01.12.2008 11:51:16
Thread-ID: 1029203
5 Beiträge
Dropdown-Auswahlliste: Ausgabe anderer Text
Daniel

Hallo
Ich habe eine Dropdown-Auswahlliste erstellt, die auch funktioniert. Nun möchte ich aber, dass aus Platzgründen ein anderer (kürzerer) Text ausgegeben wird als in der Auswahlliste angezeigt wird.
Beispiel: Anzeige = Telefon ----- Ausgabe im Feld = Tel.
Ist das überhaupt mac...
04.12.2008 08:58:00
Thread-ID: 1030032
2 Beiträge
Import eines Arbeitsblatts aus anderer Excel-Datei
eliewsam

Hallo VBA-Experten,
ist es möglich, dass ich ausgehend von einer Excel-Datei ein einzelnes Arbeitsblatt einer anderen Excel-Datei importiere. Die Vergabe eines Namens für das neue (importierte) Arbeitsblatt sollte per Dialogfenster erfolgen.
Vielleicht kann mir einer von Euch in diesbez...
04.02.2009 09:06:29
Thread-ID: 1046879
4 Beiträge
Worksheet aus anderer Datei übernehmen
tco99

Hallo zusammen,
ich habe folgende Frage bzw. Bitte:
Ich habe zwei Excel-Dateien. Die eine Datei liegt immer im selben Verzeichnis, immer mit dem Namen "Daten" und hat ein einziges Worksheet mit dem Namen "Daten".
Jetzt müsste per Makro in der zweiten Datei das Blatt "Daten" der er...
05.02.2009 21:00:00
Thread-ID: 1047509
5 Beiträge
Formeln aus anderer Datei
Thorsten

Hallo zusammen,
ich hab ne Frage auf die ich im Forum keine Antwort finde.
Und zwar möchte ich in einer Excel-Datei formeln herunterziehen.
Jedoch bezieht sich die verknüpfung auf eine andere datei.
Dann geht das irgendwie nicht .
Und zwar steht in Zelle A1 von meiner Datei...
09.02.2009 10:55:56
Thread-ID: 1048583
3 Beiträge
Worksheet aus anderer Excel Datei einbinden
Matze

Hallo zusammen!
Ich habe folgendes Vorhaben:
Ich möchte per CommandButton eine andere Excel Datei öffnen, aus dieser die einzelnen vorhandenen Worksheets (5 Stück) kopieren und diese anschließend in die Urpsungsdatei als Worksheet einbinden. Das Öffnen der anderen Excel Datei klappt, b...
26.02.2009 15:06:16
Thread-ID: 1054417
7 Beiträge
Bereichsnamen auslesen, in anderer Datei einlesen
Jörg

Hallo Forum,
ich lese meine vergebenen Bereichsnamen aus mit
Sub Namen_lesen_und_Bereich_angeben() For n = 1 To Names.Count Cells(n, 1) = Names(n).Name Cells(n, 2) = Names(n).Value Next n End Sub
Anschließend kopiere ich das Register in eine andere Datei und versuche dort die Be...
03.03.2009 15:46:37
Thread-ID: 1056016
6 Beiträge
Werte mit VB aus anderer Mappe auslesen
Jubro

Hallo zusammen,
ich sollte eine Lösung für folgendes Problemchen haben!
In einer "Mappe1/Tabelle1" habe ich einen Button der bei Click in "Mappe1/Tabelle1" in Spalte "B" die erste freie Zeile sucht und den Wert aus der Zelle links daneben in Zelle "H13" einfügt! dies funktionier ohne we...
01.05.2009 19:49:10
Thread-ID: 1072359
5 Beiträge
Werte aus anderer Mappe übernehmen
Werner

Hallo Forum,
einmal mehr benötige ich Eure Hilfe.
Ich will eine Tabelle erstellen, in der in den Feldern „E“ der Spalte „efficiency factor“ die Nummer eines entsprechenden Arbeitsgangs eingegeben wird.
Es soll dann automatisch in Feld „F“ der Zeile, in der die Arbeitsgangnummer ein...
20.05.2009 13:44:58
Thread-ID: 1076355
4 Beiträge
Zeilen einlesen aus anderer Excel Datei - Makro
Max

Hallo liebe Forums User,
nachdem meine Suche im Archiv leider nichts ergeben hat, formuliere ich meine Frage einmal:
Ich möchte eine Auswertungsdatei bauen, die Daten aus 20 anderen Sheets einliest. Die externen Datein haben unterschiedliche Namen sind aber strukturell gleich aufgebaut....
06.07.2009 11:13:44
Thread-ID: 1086547
4 Beiträge
aus anderer ExcelDatei Daten kopieren
stefan

Hallo, einen habe ich noch:
ich habe 3 Dateien aus denen ich jeweils Daten in eine Masterdatei kopieren will. Dafür lege ich neue Sheets in der Masterdatei an. Aber wie kriege ich die Dateien geöffnet, einen Bereich markiert, kopiert und ihn dann in der Masterdatei eingefügt?
Bisher hab...
30.07.2009 17:40:48
Thread-ID: 1092608
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige