Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1304to1308
1304to1308
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Copy range und Offset

Forumthread: Copy range und Offset

Copy range und Offset
05.04.2013 17:05:35
Chris
Hallo zusammen,
ich komme leider bei einer Sache gar nicht weiter:
Nachdem der Autofilter im Bereich K5:Q707 alle "1er" anzeigt, will ich die links neben den erscheinenden Inhalte liegenden Zellen kopieren, das sind die Zellen F:K.
Egal was ich bei Offset(...) eingebe, ich kriege es nicht hin. Mit -1,-6 kopiert Excel nur F-J, leider nicht K. Bei -8, kommt auch nicht das gewünschte Ergebnis.
Was mache ich falsch? CPT
Sheets("Import").Range("L5:Q707").AutoFilter Field:=1, Criteria1:="1"
Sheets("Import").AutoFilter.Range.Offset(-1, -6).Copy
Sheets("FilImport").Range("E8").PasteSpecial (xlPasteValues)

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Copy range und Offset
05.04.2013 17:10:25
Hajo_Zi
du hast für das Offset kein Range angegeben.

AW: Copy range und Offset
05.04.2013 17:14:41
Chris
Hallo Hajo,
mein VBA ist zu bescheiden - kannst du Hand anlegen bitte ...

AW: Copy range und Offset
05.04.2013 17:18:35
Hajo_Zi
wasrum schreibst Du nicht gleicch
Sheets("Import").Range("L5:Q707").copy
der Code hat eine Fehler Du kopierst alles und willst bestimmt nur das sichtbare kopieren, also Makrorecorder benutzen.
Gruß Hajo

Anzeige
AW: SpecialCells
05.04.2013 17:38:26
hary
hallo Chris
Ungetestet. 
With Sheets("Import")
.Range("L5:Q707").AutoFilter Field:=1, Criteria1:="1"
.Range("F5:K707").SpecialCells(xlVisible).Copy
Sheets("FilImport").Range("E8").PasteSpecial (xlPasteValues)
End With

gruss hary

AW: Copy range und Offset
05.04.2013 17:54:03
fcs
Hallo Chris,
hier noch eine kleine Variante: 
Sub Filtern_kopieren_2()
Sheets("Import").Range("L5:Q707").AutoFilter Field:=1, Criteria1:="1"
Sheets("Import").AutoFilter.Range.Offset(0, -6).Resize(, 6).Copy
Sheets("FilImport").Range("E8").PasteSpecial (xlPasteValues)
Application.CutCopyMode = False
End Sub

Gruß
Franz

Anzeige
AW: Copy range und Offset
05.04.2013 17:19:18
Hajo_Zi
du hast für das Offset kein Range angegeben.

;

Forumthreads zu verwandten Themen

Copy Paste Problem mit VBA
Chris

Hallo Leute,
ich habe ein Makro geschrieben, das ein aus SAP gezogenes Spreadsheet in ein formatiertes Excel File umwandelt.
Jetzt taucht plötzlich folgendes Problem auf:
Ein String wird in Zelle "A1" geschrieben, der Buchstaben und steuercode enthält.
D.H. ich habe in dieser Ze...
08.08.2008 15:10:35
Thread-ID: 1000317
11 Beiträge
Copy and Paste in Tabelle mit VBA erkennen
Helmut

Hallo,
kann ich über eine Ereignisprozdur erkennen, ob ein User in einer Tabelle manuell einen Bereich von A nach B kopiert oder ausgeschnitten hat.
Mich interessiert dann in VBA der Range der Quelle und der Range des Ziels, sobald das Ereignis eingetreten ist.
Danke im Voraus
H...
21.03.2011 15:17:35
Thread-ID: 1206677
7 Beiträge
Anzeige
Range(.Offset(1, 2), .Offset(???, 0)).Copy
K.

Hallo allerseits,
ich möcht etwas folgendermaßen kopieren:
With ActiveCell
Range(.Offset(1, 2), .Offset(5, 0)).Copy
End With
Klappt so ja auch.
Allerdings ist die 5 variabel und soll sich bis zur letzten gefüllten Zelle (der ActiveCell.Column) erstrecken. Hab schon alles...
13.01.2012 08:54:27
Thread-ID: 1245977
3 Beiträge
Anzeige
PasteSpecial statt copy Range geht nicht
Burghard

Hallo,
ich möchte mittels dieses Makros nur die Werte einfügen (also nicht mittels copy):
Sub Leerzellen_auffuellen() Dim L As Long Dim Bereich As Range For L = 1 To 10000 If WorksheetFunction.CountIf(Range(Cells(L, 6), Cells(L, 8)), "") = 3 Then _ Range(Cells(L, 1), Cells(L, 2)).Copy R...
21.01.2013 17:34:43
Thread-ID: 1295268
9 Beiträge
VBA: Zeilen aus Range kopieren bei Übereinstimmung
Patrik

Hallo zusammen
Ich möchte die Werte einer ganze Zeilen aus einem Bereich in einen zweiten Bereich auf ein anderes Blatt kopieren, sofern in einem zweiten einspaltigen Bereich die Werte in der gleichen Zeile übereinstimmen.
Range_Offset_Origin: Einspaltiger Bereich mit Vergelichswerten
01.03.2013 10:05:19
Thread-ID: 1301702
7 Beiträge
Copy/Paste funktion für bestimmten Range sperren
StefanG

Hallo zusammen,wie kann ich die Copy/paste Funktion für einen Bestimmten Range sperren?Ich möchte für einen bestimmten Zellrange die möglichkeit sperren etwas reinzukopieren. Geht das, wenn ja, wie?das ganze soll Sheet spezifisch sein, also unter Worksheet laufen.GrußStefan
11.07.2002 08:08:54
Thread-ID: 135585
8 Beiträge
Range - Copy Destination & PasteSpecial
Thomas

Hallo Erich & Bastian!
Vielen Dank für Eure Hilfe, leider war der Thread schon geschlossen (von mir?) und ich konnte nicht mehr auf Antworten...
Jedenfalls hat die Variante von Erich bestens funkioniert und ich werde sie auch verwenden, die von Dir Bastian leider nicht - zumindest i...
07.10.2013 22:21:30
Thread-ID: 1333486
4 Beiträge
VBA select then copy then paste
Paul

Hallo Leute,
ich hoffe Ihr könnt mir helfen. Ich möchte aus Tabelle 1 zunächst Spalte M nach dem Wert/Wort "Germany" durchsuchen, anschließend aus der Spalte AF den korrespondierenden Wert in Tabelle 2 Spalte F einfügen. Das ganze sollte möglichst über ein Command Button in Tabelle 2 laufe...
27.12.2013 18:35:00
Thread-ID: 1343585
7 Beiträge
VBA: Dynamisches Copy-Pasten mittels Identifier
Hamiltonian

Hallo liebe Forengemeinde,
nachdem ich schon eine halbe Ewigkeit fleißig mitlese und mir die ein oder andere Antwort wie auch Tutorials über schwere Excelzeiten hinweg geholfen haben, muss ich mich jetzt doch mit einem eigenen Thread mal an euch wenden.
Vorab: Ich konnte in der Suche ni...
22.04.2014 20:00:18
Thread-ID: 1358213
4 Beiträge
Copy Paste abfangen - VBA ! Erweitert...
Thorben

Guten morgen alle zusammen,
ich habe hier diese Datei von Tino in der Recherche gefunden (geiles Teil ;)
https://www.herber.de/bbs/user/70002.xls
Nun hab ich die Frage ob man es so anpassen kann (und wenn ja wie) dass, egal in welchem Blatt ich "paste" anwende, immer in Tabelle X (...
13.05.2014 08:38:20
Thread-ID: 1361235
2 Beiträge
per VBA Range finden, die im cutcopy-mode ist
anugyan

Hi Leute,
gibt es eine Möglichkeit in Excel die Range zu finden (und in eine Variable zu speichern), die sich im cutcopy-mode befindet, wenn nach SelectionsChange schon eine andere Zelle markiert ist?
Über eine schnelle Hilfe würde ich mich sehr freuen. Danke
Anugyan
14.07.2002 12:46:57
Thread-ID: 136397
3 Beiträge
Anzeige
VBA Copy/Paste Spalten in andere Datei
Sio
Hallo, lerne gerade VBA und bastel gerade an folgendem Makro:
Ziel des Makros:
-Spalten A:C kopieren
- Datei auswählen wohin es kopiert werden soll
- Einfügen in ein spezielles Worksheet dieser Datei
- Refresh der Datei
- schließen der Datei woraus es kopiert wurde
Das...
23.08.2014 11:23:10
Thread-ID: 1377842
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige