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

Forumthread: Wert einfügen bei klick in Zelle

Wert einfügen bei klick in Zelle
12.12.2019 16:25:29
prinz_valium
Folgender Sachverhalt:
Bei einem klick in eine Zelle (A10 bis A3000), soll in selbiger ein bestimmter Wert automatisch eingefügt werden. Am liebsten der, der sich in der Zwischenablage befindet, damit dieser in der Mappe geändert werden kann.
Es ist eine einfache Mappe, wo auch nur diese eine Makro ausgeführt werden soll um sich einen Schritt (paste) zu sparen, weil an einem Tablet ohne Tastatur gearbeitet wird.
Für die Profis vllt simpel hier und ich habe auch schon etwas recherchiert und rumprobiert, aber bisher ohne Erfolg.
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Wert einfügen bei klick in Zelle
12.12.2019 16:45:44
ChrisL
Hi
Ins Modul der betreffenden Tabelle
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A10:A3000")) Is Nothing Then ActiveSheet.Paste
End Sub

cu
Chris
AW: Wert einfügen bei klick in Zelle
12.12.2019 17:02:38
prinz_valium
Danke, ChrisL
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Wert einfügen bei Klick in Zelle


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und die betreffende Arbeitsmappe.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Navigiere im Projekt-Explorer zur Tabelle, in der du das Makro anwenden möchtest (z.B. „Tabelle1“).

  4. Doppelklicke auf die Tabelle, um das Codefenster zu öffnen.

  5. Füge den folgenden VBA-Code in das Codefenster ein:

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
       If Not Intersect(Target, Range("A10:A3000")) Is Nothing Then
           ActiveSheet.Paste
       End If
    End Sub
  6. Schließe den VBA-Editor und kehre zu Excel zurück.

  7. Teste das Makro, indem du in eine der Zellen im Bereich A10 bis A3000 klickst, nachdem du einen Wert in die Zwischenablage kopiert hast.


Häufige Fehler und Lösungen

  • Fehler: Nichts passiert beim Klick in die Zelle.

    • Lösung: Stelle sicher, dass der Wert tatsächlich in der Zwischenablage ist. Wenn du keinen Wert kopiert hast, kann das Makro nichts einfügen.
  • Fehler: Das Makro funktioniert nicht in einer bestimmten Excel-Version.

    • Lösung: Vergewissere dich, dass du eine kompatible Version von Excel verwendest. Der obige VBA-Code funktioniert in Excel 2010 und höher.

Alternative Methoden

Wenn du keine VBA-Makros verwenden möchtest, gibt es alternative Ansätze:

  • Verwenden von Excel-Formeln: Du kannst eine Formel verwenden, um Werte automatisch zu berechnen, das ist jedoch nicht dasselbe wie das Einfügen von Werten durch einen Klick.

  • Excel Add-Ins: Es gibt viele Add-Ins, die dir helfen können, das Einfügen von Werten zu automatisieren, ohne dass du VBA verwenden musst.


Praktische Beispiele

  1. Beispiel für das Einfügen eines Wertes: Wenn du einen Wert wie "Test" in die Zwischenablage kopierst und dann auf A10 klickst, sollte "Test" automatisch in die Zelle eingefügt werden.

  2. Verwendung in einer großen Tabelle: Wenn du eine Tabelle mit vielen Einträgen hast und oft denselben Wert eingeben musst, kann dieses Makro dir helfen, Zeit zu sparen und die Effizienz zu erhöhen.


Tipps für Profis

  • Erweiterung des Makros: Du kannst das Makro erweitern, um unterschiedliche Werte basierend auf der Zelle, die du auswählst, einzufügen. Das erfordert jedoch etwas mehr VBA-Kenntnisse.

  • Sicherheit bedenken: Stelle sicher, dass du Makros nur aus vertrauenswürdigen Quellen verwendest, da sie Sicherheitsrisiken darstellen können.


FAQ: Häufige Fragen

1. Frage
Wie kann ich das Makro in einer neuen Arbeitsmappe verwenden?
Antwort: Du musst den VBA-Code in das entsprechende Tabellenmodul der neuen Arbeitsmappe einfügen, wie in der Schritt-für-Schritt-Anleitung beschrieben.

2. Frage
Kann ich das Makro für andere Zellbereiche anpassen?
Antwort: Ja, ändere einfach den Bereich in der Intersect-Funktion, um andere Zellen in deiner Tabelle zu berücksichtigen.

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