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

Doppelklick auf eine Zelle soll Wert kopieren

Forumthread: Doppelklick auf eine Zelle soll Wert kopieren

Doppelklick auf eine Zelle soll Wert kopieren
03.10.2002 10:24:07
Karsten
Hi Leute,

ich möchte durch Doppelklick auf eine Zelle den Wert kopieren und in einem anderen Arbeitsblatt an Pos $A$1 einfügen.

Wer weiß Rat?

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Doppelklick auf eine Zelle soll Wert kopieren
03.10.2002 10:29:50
andreas e
wie wäre es so ?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Sheets(1).Range("a1").Value = ActiveCell.Value
End Sub

gruß
andreas e
http://www.skripteundaufgaben.de viele kostenlose Downloads und Lösungsansätze zu EXCEL und mehr

Anzeige
kleine Ergänzung
03.10.2002 10:36:57
Hajo_Zi
Hallo Karsten

Gruß Hajo

Re: kleine Ergänzung
03.10.2002 10:49:24
Karsten
Ja, fast :-(

Es soll aber bei Doppelklick das Arbeitsblatt "Tabelle 2" aufgerufen und der Wert dort in a1 eigetragen werden.

Gruß Karsten

Re: kleine Ergänzung
03.10.2002 10:51:28
Hajo_Zi
Hallo Karsten

der Cursor ist kein Hund der überall rumgeführt werden muß

Gruß Hajo

Anzeige
Re: kleine Ergänzung
03.10.2002 10:52:34
andreas e
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Sheets("Tabelle2").Range("a1").Value = ActiveCell.Value
Cancel = True
End Sub

gruß
andreas e
http://www.skripteundaufgaben.de viele kostenlose Downloads und Lösungsansätze zu EXCEL und mehr

Anzeige
Re: kleine Ergänzung
03.10.2002 11:09:29
Karsten
Hallo andreas e, hallo Hajo,

danke so läuft's. Jetzt möchte ich dabei auch noch die Tabelle 2 aktiv setzen.

> der Cursor ist kein Hund der überall rumgeführt werden muß

Entschuldige, aber den Spruch verstehe ich nicht.

Gruß Karsten

Re: kleine Ergänzung
03.10.2002 11:20:31
Hajo_Zi
Hallo Karsten

in VBA kann auf Select und ähnliche Befehle verzichtet werden. Du mußt nicht immer den Cursor dorthin führen wo die nächste Aktion gemacht werden soll.

Gruß Hajo

Anzeige
Re: kleine Ergänzung
03.10.2002 11:28:43
Karsten
Hallo Hajo,

Danke. Genau so wollt ich es haben.
Da ich in diesem Fall mit dem zweiten Worksheet weiterarbeiten möchte, mußte der Cursor folgen.

Vielen Dank
Karsten

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Doppelklick auf eine Zelle zum Kopieren von Werten in Excel


Schritt-für-Schritt-Anleitung

Um in Excel durch einen Doppelklick auf eine Zelle den Wert zu kopieren und in ein anderes Arbeitsblatt einzufügen, kannst Du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Anleitung:

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Wähle das Arbeitsblatt aus:

    • Doppelklicke im Projektfenster auf das Arbeitsblatt, in dem Du die Doppelklick-Funktion implementieren möchtest.
  3. Füge den folgenden Code ein:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
       Sheets("Tabelle2").Range("A1").Value = ActiveCell.Value
       Cancel = True
    End Sub
    • Dieser Code sorgt dafür, dass beim Doppelklick auf eine Zelle der Wert in die Zelle A1 des Arbeitsblatts "Tabelle2" kopiert wird.
  4. Speichere die Änderungen:

    • Schließe den VBA-Editor und speichere die Datei als Excel-Arbeitsmappe mit Makros (Dateiendung .xlsm).
  5. Teste die Funktion:

    • Doppelklicke auf eine Zelle im angegebenen Arbeitsblatt, um den Wert zu kopieren.

Häufige Fehler und Lösungen

  • Fehler: Doppelklick funktioniert nicht
    Lösung: Stelle sicher, dass der Code im richtigen Arbeitsblatt-Modul eingefügt wurde. Der Code muss in dem Arbeitsblatt sein, in dem Du die Aktion ausführen möchtest.

  • Fehler: Wert wird nicht kopiert
    Lösung: Überprüfe den Namen des Arbeitsblatts im Code. Achte darauf, dass "Tabelle2" genau so heißt. Wenn Dein Blatt einen anderen Namen hat, passe den Code entsprechend an.


Alternative Methoden

Wenn Du den Doppelklick nicht verwenden möchtest, gibt es auch andere Möglichkeiten:

  1. Excel in Zelle schreiben ohne Doppelklick: Du kannst eine Schaltfläche erstellen, die den Wert aus einer Zelle in ein anderes Arbeitsblatt kopiert, wenn Du darauf klickst.

  2. Excel mit Doppelklick in Zelle springen: Du kannst den Doppelklick nutzen, um direkt zu einem anderen Arbeitsblatt zu springen, ohne Werte zu kopieren. Dazu kannst Du den Code wie folgt anpassen:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
       Sheets("Tabelle2").Activate
       Cancel = True
    End Sub

Praktische Beispiele

Hier sind einige Beispiele zur Veranschaulichung:

  • Beispiel 1: Du hast auf "Tabelle1" den Wert "100" in Zelle A1 und Doppelklick darauf. Nach dem Doppelklick wird der Wert in "Tabelle2" A1 eingefügt.

  • Beispiel 2: Wenn Du den Doppelklick verwendest, um zur "Tabelle2" zu springen, kannst Du dort direkt weiterarbeiten, ohne manuell wechseln zu müssen.


Tipps für Profis

  • Verwende Target: Du kannst den Target-Parameter nutzen, um den Wert der angeklickten Zelle dynamisch zu kopieren, anstatt immer den aktiven Wert zu verwenden.

    Sheets("Tabelle2").Range("A1").Value = Target.Value
  • Multiple Zellen: Wenn Du mehrere Zellen kopieren möchtest, kannst Du den Code erweitern, um die Werte in eine Liste einzufügen.


FAQ: Häufige Fragen

1. Wie kann ich die Funktion deaktivieren?
Du kannst den Code einfach aus dem Arbeitsblatt-Modul löschen oder auskommentieren, indem Du ein ' vor die Zeile setzt.

2. Funktioniert das auch in Excel Online?
Nein, VBA-Makros sind in Excel Online nicht verfügbar. Du musst die Desktop-Version von Excel verwenden.

3. Kann ich die Zielzelle anpassen?
Ja, ändere einfach die Range in Sheets("Tabelle2").Range("A1") zu der gewünschten Zelle, in die Du den Wert kopieren möchtest.

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