|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
01.08.2017 17:03:15 |
Anna |
|
|
|
01.08.2017 17:43:48 |
Kai |
|
|
|
01.08.2017 17:47:32 |
Kai |
|
|
 "Kopier-Schleife" mit variablem Zellbereich |
02.08.2017 09:49:26 |
Anna |
|
|
Von:
Anna |
Datum:
02.08.2017 09:49:26 |
Views:
870 |
Rating:
|
Antwort:
|
Thema:
"Kopier-Schleife" mit variablem Zellbereich |
|
Hallo Kai,
danke dir! Die Zeilen werden tatsächlich in ein anderes Sheet kopiert, das habe ich hier falsch eingefügt.
Es soll bei jedem Kopiervorgang nur eine Zeile kopiert werden, beim nächsten Kopiervorgang soll dann die nächste Zeile kopiert werden usw. Deshalb die Schleife mit ...Offset(i, 0).Copy
Dein IngLetzteZeile kann also durch 2 ersetzt werden, weil die erste zu kopierende Zeile in Zeile 3 (2 + i, i = 1 To Schleifenende) steht.
.Range(.Cells(2, 2), .Cells(lngLetzteZeile, Kopierspalte_Ende)).Copy
Sheets("insert").Range("B3").PasteSpecial Paste:=xlValues
Also so:
Worksheets("LG").Range(.Cells(2, 2), .Cells(2, Kopierspalte_Ende)).Offset(i, 0).Copy
Worksheets("Matrix").Range("B3").PasteSpecial Paste:=xlValues
Bis auf das Offset(i, 0), das ich wie gesagt für die Schleife brauche, müsste es doch dann funktionieren...
Jetzt kommt die Fehlermeldung:
Unzulässiger oder nicht ausreichend definierter Verweis an der Stelle .Cells (2, 2)
Liegt der Fehler dann wahrscheinlich woanders im Code? |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
01.08.2017 17:03:15 |
Anna |
|
|
|
01.08.2017 17:43:48 |
Kai |
|
|
|
01.08.2017 17:47:32 |
Kai |
|
|
"Kopier-Schleife" mit variablem Zellbereich |
02.08.2017 09:49:26 |
Anna |
|
|