Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeile in anderes Tabellenblatt kopieren

Zeile in anderes Tabellenblatt kopieren
Stefan
Hallo Zusammen,
wie kann ich eine feste Zeile 2 der Tabelle "Aktuell" (besteht aus Verknüpfungen) in die
nächste freie Zeile der Tabelle "Archiv" kopieren (Werte) ?
Gruß
Stefan
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeile in anderes Tabellenblatt kopieren
31.05.2011 10:14:04
Soto
Hallo Stefan,
das dürfte folgender Code sein:
Sheets("Aktuell").Rows(2).Copy Sheets("Archiv").Cells(Rows.Count, 1).End(xlUp).Offset(1)
Gruß
Soto
AW: Zeile in anderes Tabellenblatt kopieren
31.05.2011 10:51:25
Stefan
Hallo Soto,
danke für die schnelle Hilfe!!!
Er kopierts mir rüber, allerdings nur die Verknüpfungen.
Ich bräuchte die Werte ?
Gruß
Stefan
Anzeige
AW: Zeile in anderes Tabellenblatt kopieren
31.05.2011 11:01:46
hary
Hallo Stefan
ungetestet.

Sheets("Aktuell").Rows(2).Copy
Sheets("Archiv").Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial Paste:=xlValues,  _
operation:=xlNone, skipblanks:=False, Transpose:=False

gruss hary
AW: Zeile in anderes Tabellenblatt kopieren
31.05.2011 11:11:59
Stefan
Danke
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zeile in ein anderes Tabellenblatt kopieren


Schritt-für-Schritt-Anleitung

Um eine bestimmte Zeile aus einem Tabellenblatt in ein anderes zu kopieren, kannst Du den folgenden VBA-Code verwenden. Dieser Code kopiert die Werte der Zeile 2 aus dem Blatt "Aktuell" in die nächste freie Zeile des Blattes "Archiv".

Sheets("Aktuell").Rows(2).Copy
Sheets("Archiv").Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial Paste:=xlValues, _
operation:=xlNone, skipblanks:=False, Transpose:=False
  1. Öffne die Excel-Datei, in der Du die Zeile kopieren möchtest.
  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.
  3. Füge ein neues Modul hinzu (Einfügen > Modul).
  4. Kopiere den obenstehenden Code in das Modul.
  5. Schließe den VBA-Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Problem: Die Verknüpfungen werden kopiert, nicht die Werte.

    • Lösung: Stelle sicher, dass Du die PasteSpecial-Methode verwendest, um nur die Werte zu kopieren, wie im obigen Beispiel gezeigt.
  • Problem: Die Zeile wird nicht in die nächste freie Zeile eingefügt.

    • Lösung: Überprüfe, ob das Zielblatt "Archiv" korrekt benannt ist und ob es Daten in der ersten Spalte gibt, um die letzte gefüllte Zeile zu finden.

Alternative Methoden

Es gibt auch andere Möglichkeiten, um Zeilen in ein anderes Tabellenblatt zu kopieren:

  1. Manuelles Kopieren:

    • Markiere die gewünschte Zeile in "Aktuell", kopiere sie (Strg + C) und füge sie (Strg + V) in "Archiv" ein. Achte darauf, die Option "Werte einfügen" zu wählen, wenn Du nur die Werte benötigst.
  2. Excel-Funktionen:

    • Verwende die =INDIREKT()-Funktion, um Daten dynamisch aus einem anderen Blatt zu ziehen.

Praktische Beispiele

  • Beispiel 1: Bestimmte Zeilen basierend auf einer Bedingung kopieren.
    • Du kannst eine Schleife verwenden, um nur bestimmte Zeilen zu kopieren, die einen bestimmten Wert enthalten.
Dim i As Integer
For i = 1 To Sheets("Aktuell").Cells(Rows.Count, 1).End(xlUp).Row
    If Sheets("Aktuell").Cells(i, 1).Value = "Bedingung" Then
        Sheets("Aktuell").Rows(i).Copy
        Sheets("Archiv").Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial Paste:=xlValues
    End If
Next i
  • Beispiel 2: Automatisches Kopieren von Zeilen.
    • Verwende ein Makro, das beim Öffnen der Datei automatisch bestimmte Zeilen in ein anderes Blatt kopiert.

Tipps für Profis

  • Verwende Named Ranges: Wenn Du oft mit bestimmten Bereichen arbeitest, kannst Du Named Ranges in Excel erstellen, um die Lesbarkeit Deiner VBA-Codes zu verbessern.
  • Fehlerbehandlung: Implementiere eine Fehlerbehandlung in Deinem VBA-Code, um unerwartete Fehler zu vermeiden.
  • Dokumentation: Kommentiere Deinen VBA-Code gut, damit Du und andere ihn in Zukunft leichter verstehen können.

FAQ: Häufige Fragen

1. Frage Wie kann ich mehrere Zeilen gleichzeitig kopieren?

Antwort Du kannst eine Schleife oder einen Bereich angeben, den Du kopieren möchtest, z.B. Sheets("Aktuell").Rows("2:5").Copy.

2. Frage Gibt es eine Möglichkeit, nur bestimmte Zellen in der Zeile zu kopieren?

Antwort Ja, Du kannst die Zellen gezielt auswählen, z.B. Sheets("Aktuell").Range("A2:C2").Copy und dann in das Zielblatt einfügen.

Beliebteste Forumthreads (12 Monate)

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