Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: per Doppelklick in Zelle Zeile kopieren

per Doppelklick in Zelle Zeile kopieren
22.01.2006 12:42:23
Sören
Hallo und guten Tag,
wie kann ich durch einen Doppelklick in eine Zelle die ganze Zeile nach Tabelle1 (nächste leere Zeile) kopieren?
Danke für eure Hilfe.
Gruße Sören
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: per Doppelklick in Zelle Zeile kopieren
22.01.2006 12:46:12
Matthias
Hallo Sören,
ins Tabellenblattmodul:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim z As Long
Cancel = True
With Sheets("Tabelle1")
z = .Cells(Rows.Count, 1).End(xlUp).Row + 1
Target.EntireRow.Copy .Rows(z)
End With
End Sub

Gruß Matthias
Anzeige
Danke Matthias, dass war´s.
22.01.2006 12:49:30
Sören
Danke Matthias, dass war´s.
Gruß Sören
;

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

Zeilenkopieren per Doppelklick in Excel


Schritt-für-Schritt-Anleitung

Um in Excel durch einen Doppelklick auf eine Zelle die gesamte Zeile zu kopieren, kannst du den folgenden VBA-Code verwenden. Gehe wie folgt vor:

  1. Öffne dein Excel-Dokument und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Wähle im Projektfenster das entsprechende Arbeitsblatt aus, in dem du die Funktion implementieren möchtest (z. B. "Tabelle1").

  3. Füge den folgenden Code in das Codefenster ein:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim z As Long
    Cancel = True
    With Sheets("Tabelle1")
    z = .Cells(Rows.Count, 1).End(xlUp).Row + 1
    Target.EntireRow.Copy .Rows(z)
    End With
    End Sub
  4. Schließe den VBA-Editor und kehre zu deinem Excel-Dokument zurück.

  5. Teste die Funktion, indem du auf eine Zelle doppelklickst. Die gesamte Zeile sollte in die nächste leere Zeile auf "Tabelle1" kopiert werden.


Häufige Fehler und Lösungen

  • Fehler: Nach dem Doppelklick wird nichts kopiert.

    • Lösung: Stelle sicher, dass der VBA-Code korrekt im richtigen Arbeitsblattmodul eingefügt wurde. Der Code muss in das Modul des jeweiligen Arbeitsblatts und nicht in ein allgemeines Modul eingefügt werden.
  • Fehler: Es wird immer die gleiche Zeile kopiert.

    • Lösung: Überprüfe, ob der Code die richtige Zielzeile für das Kopieren bestimmt. Der Code z = .Cells(Rows.Count, 1).End(xlUp).Row + 1 sollte die nächste leere Zeile korrekt identifizieren.

Alternative Methoden

Falls du keine VBA-Makros verwenden möchtest, kannst du die Zeile auch manuell kopieren:

  1. Markiere die gesamte Zeile, die du kopieren möchtest.
  2. Klicke mit der rechten Maustaste und wähle "Kopieren".
  3. Gehe zu "Tabelle1" und klicke mit der rechten Maustaste auf die nächste leere Zeile.
  4. Wähle "Einfügen".

Diese Methode ist zwar nicht so bequem wie der Doppelklick, funktioniert jedoch ohne VBA.


Praktische Beispiele

Angenommen, du hast Daten in "Tabelle2" und möchtest bei einem Doppelklick auf eine Zelle die gesamte Zeile nach "Tabelle1" kopieren:

  • Wenn du auf Zelle A2 in "Tabelle2" doppelklickst, wird die gesamte Zeile 2 nach "Tabelle1" in die nächste leere Zeile kopiert.
  • Dies ist besonders nützlich für das Verwalten von Daten oder das Erstellen von Berichten.

Tipps für Profis

  • Überlege, die Funktionalität weiter auszubauen, indem du Bedingungen hinzufügst, die das Kopieren nur unter bestimmten Voraussetzungen erlauben (z. B. nur, wenn eine Zelle in der Zeile einen bestimmten Wert hat).
  • Nutze die Möglichkeit, die formatierte Zeile zu kopieren, anstatt nur den Inhalt. Dies kannst du mit Target.EntireRow.Copy und .PasteSpecial erreichen.

FAQ: Häufige Fragen

1. Muss ich Makros aktivieren, um den Doppelklick zu verwenden?
Ja, du musst Makros in deinen Excel-Einstellungen aktivieren, damit der VBA-Code funktioniert.

2. Funktioniert dieser Code in allen Excel-Versionen?
Der bereitgestellte VBA-Code sollte in den meisten modernen Excel-Versionen (ab Excel 2007) funktionieren. Achte darauf, dass du die richtigen Berechtigungen für das Ausführen von Makros hast.

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