Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1864to1868
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
1864to1868
1864to1868
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ganze Zeile in andere Blatt kopieren

Ganze Zeile in andere Blatt kopieren
18.01.2022 17:56:34
Phil
Hallo,
ich hoffe mir kann jemand helfen. Ich bin leider nicht so der Profi was Schleifen angeht^^
Ich möchte folgendes erreichen:
Ich habe 2 Arbeitsblätter, die an sich gleich aufgebaut sind. Nun möchte ich via button aus dem einen alle Zeilen kopieren, bei dem ich zuvor in einer vorgesehenden Spalte z.b. ein X gesetzt habe, in das 2. Arbeitsblatt kopieren. Kann mir da jemand sagen, wie ich das umsetzen könnte? Dabei sollen am besten Laufvariablen durchlaufen, weil die Tabelle etwas größer wird.
Wäre super gut. Viele Grüße

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 19:05:51
{Boris}
Hi,
filter die Tabelle nach "x", kopiere das Filterergebnis und füge es in das andere Blatt ein. Lass dabei den Makrorecorder mitlaufen.
VG, Boris
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 19:18:43
Phil
Hi,
ich denke das klappt nur für definierte Zellen dann oder? Damit kann ich nicht erreichen, dass die zu kopierende Zeile(n) dann auf dem 2. Arbeitsblatt unter die letzte schon vorhandene geschrieben wird?
Aber danke schon mal für deinen Tipp ;)
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 19:23:08
{Boris}
Hi,

unter die letzte schon vorhandene geschrieben wird?
Das ist dann ein Klacks - zeig vorher erstmal Dein (aufgezeichnetes) Makro - am Besten in Deiner (anonymisierten) Datei, die Du hier hochlädst.
VG, Boris
Anzeige
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 20:21:08
Phil
Hier mal was beim Makro aufnehmen bei rausgekommen ist: Kann man das noch besser und automatisierter schreiben? :)
Vielen Dank für die Hilfe

Sub buttontest()
' buttontest Makro
ActiveSheet.Range("$C$7:$X$11").AutoFilter Field:=20, Criteria1:=""
ActiveWindow.ScrollColumn = 5
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 1
Rows("8:8").Select
Selection.Copy
Sheets("Realisierte GoV").Select
Rows("9:9").Select
ActiveSheet.Paste
End Sub

AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 20:27:19
Phil
Hier mal was beim Makro aufnehmen bei rausgekommen ist: Kann man das noch besser und automatisierter schreiben? :)
Vielen Dank für die Hilfe

Sub buttontest()
' buttontest Makro
ActiveSheet.Range("$C$7:$X$11").AutoFilter Field:=20, Criteria1:=""
ActiveWindow.ScrollColumn = 5
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 1
Rows("8:8").Select
Selection.Copy
Sheets("Realisierte GoV").Select
Rows("9:9").Select
ActiveSheet.Paste
End Sub

Anzeige
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 20:27:11
Guesa
Hallo Phil
Hilft das

Sub X_kopieren()
Dim i As Long
With Sheets("Tabelle1")
For i = .Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1
If .Cells(i, "D") Like "X" Or .Cells(i, "D") Like "x" Then
.Rows(i).Copy Sheets("Tabelle2").Cells(Sheets("Tabelle2").Cells(Rows.Count, "A").End(xlUp).Row + 1, "A")
End If
Next
End With
End Sub
Tabellen und Spalte wo das X steht anpassen
Gruß, Guesa
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 20:39:26
Phil
Oh wow, das klappt mit kleinen Anpassungen wunderbar. Taaausend Dank :)
AW: Ganze Zeile in andere Blatt kopieren
18.01.2022 20:43:55
Guesa
Gerne

300 Forumthreads zu ähnlichen Themen

VBA Zeilen kopieren bis...
Silvi

Hallo,
kann mir bitte mal jemand bei folgendem Makro helfen:
'Rows("2:2").Select
Selection.Copy
Range("A3").Activate
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Activate
Loop
ActiveSheet.Paste
Selection.Copy
Selection.PasteSpecial Paste:=xlValu...
13.10.2008 13:13:04
Thread-ID: 1016022
13 Beiträge
Anzeige
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
Zeilen variabel oft kopieren und einfügen
Bernd

Hallo Forum,
ich tüftle seit einiger Zeit vergebens an folgender Aufgabe und bitte um eure Hilfe:
Ich habe in einer Mappe zwei Sheets: Tab1 und Tab2
In Tab1 importiere ich Daten mit Hilfe des Textkonvertierungsassistenten aus einer txt-Datei.
Die txt-Datei kann unterschiedlich v...
03.09.2009 17:41:35
Thread-ID: 1100389
9 Beiträge
Anzeige
Zeilenwerte auslesen und ganze Zeilen kopieren
Kristopher

Hallo an alle,
leider bin ich ein absoluter VBA-Neuling und relativ schnell mit einem – für mich – großen „Programm“ betraut worden.
Es gibt zwei Dokumente, im ersten Dokument (A) soll jeweils der Wert der Spalte C geprüft werden. Wenn der Wert = 1 ist, dann soll er in der gleichen Zeil...
21.04.2010 12:11:44
Thread-ID: 1152936
3 Beiträge
VBA Spalte kopieren und mehrfach (X-mal) einfügen
Sebastian

Hallo,
ich habe folgendes Problem:
Ich habe ein Excel Tabelle und möchte dort die komplette Spalte M kopieren und direkt rechts daneben mehrmals wieder einfügen (wenn möglich nicht nur die Inhalte sondern inkl. aller Formatierungen).
Die Menge, wie oft diese Spalte wieder eingefügt...
21.07.2010 15:44:35
Thread-ID: 1168151
6 Beiträge
Makro/VBA Sheets kopieren und einfügen
Thomas

Hallo liebe EXCEL-Spezialisten,
ich würde gerne wissen, ob ihr mir bei folgendem Anliegen weiterhelfen könntet:
Ich habe eine EXCEL-Datei erstellt, in der Schaltflächen hinterlegt sind, die spezielle Aufgaben erfüllen, u.a. Dateien öffnen, dann fragen, wo man sie speichern möchte, um so...
02.02.2011 14:19:48
Thread-ID: 1198561
3 Beiträge
VBA Zeilenhöhe kopieren
jens

Hallo Excel-Profis,
ich hatte heute ein Problem beim kopieren von Daten:
Die Zeilenhöhe wurde nicht mitkopiert und schon paßte nichts mehr.
Habe dann rausgefunden, dass man die gesamte Zeile kopieren kann und er nimmt die Zeilenhöhe mit. Das ist in meinem Fall aber mit viel Löscharb...
12.03.2011 09:09:39
Thread-ID: 1205376
15 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

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