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

"wenn zelle a1 angeklickt"

Forumthread: "wenn zelle a1 angeklickt"

"wenn zelle a1 angeklickt"
30.05.2005 13:47:55
mr_damoon
Hallo Exceler,
ich benötige für einen VBA-Code die Programmzeile
"Wenn Zelle "A1" angeklickt (markiert, angewählt,...), Dann..."
Kann mir da jemand weiterhelfen?
Und: nutze ich da als Sub-name das
"Worksheet_SelectionChange(ByVal Target As Range)"?
Vielen Dank für die Hilfe.

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: "wenn zelle a1 angeklickt"
30.05.2005 13:50:17
Hajo_Zi
Hallo
If Target.Address = "$A$1" Then
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.


AW: "wenn zelle a1 angeklickt"
30.05.2005 13:52:57
mr_damoon
Danke Hajo der Code funtioniert.
Worksheet_SelectionChange(ByVal Target As Range)" passt auch.
mfg
Andreas
Anzeige
AW: "wenn zelle a1 angeklickt"
30.05.2005 13:51:59
henrik
Worksheet_SelectionChange(ByVal Target As Range)
if Target.Address = Sheeet().Range("A1").Address then
...
end if
;

Forumthreads zu verwandten Themen

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

Wenn Zelle A1 angeklickt: So funktioniert's in Excel


Schritt-für-Schritt-Anleitung

Um den VBA-Code zu erstellen, der eine Aktion ausführt, wenn Zelle A1 angeklickt wird, folge diesen Schritten:

  1. Öffne das Excel-Dokument, in dem Du den Code einfügen möchtest.

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

  3. Doppelklicke auf das Arbeitsblatt, in dem Du die Funktion implementieren möchtest (z.B. "Tabelle1").

  4. Füge den folgenden Code ein:

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
       If Target.Address = "$A$1" Then
           ' Hier Deine Aktion einfügen
           MsgBox "Zelle A1 wurde angeklickt!"
       End If
    End Sub
  5. Speichere die Änderungen und schließe den VBA-Editor.

  6. Teste den Code, indem Du auf Zelle A1 klickst. Ein Meldungsfeld sollte erscheinen.


Häufige Fehler und Lösungen

  • Problem: Der Code funktioniert nicht.

    • Lösung: Stelle sicher, dass Du den Code in das richtige Arbeitsblatt eingefügt hast. Der Code muss in der jeweiligen Tabelle sein, nicht in einem allgemeinen Modul.
  • Problem: Meldung erscheint nicht.

    • Lösung: Überprüfe, ob die Adresse korrekt ist. Die Zeile If Target.Address = "$A$1" Then muss genau so lauten.

Alternative Methoden

Eine andere Möglichkeit, um zu reagieren, wenn Zelle A1 angeklickt wird, ist die Verwendung von Schaltflächen oder Formularelementen. Du kannst ein Formular erstellen, das bei einem Klick auf Zelle A1 erscheint und verschiedene Optionen bietet.

  1. Füge eine Schaltfläche ein:

    • Gehe zu Entwicklertools > Einfügen > Wähle Schaltfläche (Formularsteuerelement).
    • Zeichne die Schaltfläche auf dem Arbeitsblatt.
  2. Schreibe den Code für die Schaltfläche, der die gewünschte Aktion ausführt.


Praktische Beispiele

Hier sind einige Anwendungsbeispiele für den VBA-Code:

  • Benachrichtigung anzeigen: Du kannst eine Nachricht anzeigen, wenn A1 angeklickt wird.

    MsgBox "Willkommen! Du hast die Zelle A1 angeklickt."
  • Daten in eine andere Zelle übertragen: Du könntest auch Daten von A1 in B1 kopieren, wenn A1 angeklickt wird.

    Range("B1").Value = Range("A1").Value

Tipps für Profis

  • Verwende Application.EnableEvents = False, um zu verhindern, dass andere Ereignisse während Deiner Aktion ausgelöst werden.
  • Teste Deinen Code regelmäßig, um sicherzustellen, dass alle Funktionen wie gewünscht arbeiten, insbesondere nach Änderungen.
  • Füge Fehlerbehandlung hinzu mit On Error Resume Next, um unerwartete Fehler zu vermeiden.

FAQ: Häufige Fragen

1. Kann ich mehrere Zellen überwachen?
Ja, Du kannst weitere If-Bedingungen hinzufügen, um auch auf andere Zellen zu reagieren.

2. Funktioniert dieser Code in Excel 365?
Ja, der VBA-Code ist mit Excel 365 sowie den meisten anderen Versionen kompatibel.

3. Was, wenn ich eine andere Aktion als eine MsgBox ausführen möchte?
Du kannst jede Art von Aktion innerhalb der If-Bedingung definieren, z.B. das Ändern von Zellinhalten, das Ausführen von Berechnungen oder das Öffnen von Benutzerdialogen.

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