Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Klick auf Zelle -> Makro auslösen

Forumthread: Klick auf Zelle -> Makro auslösen

Klick auf Zelle -> Makro auslösen
19.10.2004 16:25:03
Michal
Kann man durch das Klicken auf eine Zelle ein Makro auslösen? Wenn ja, wie?
Gruss Michal

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Klick auf Zelle -> Makro auslösen
Jürgen
Hallo,
schreib den Code in das Tabellenblatt (Rechtsclick auf das Tabellenblatt und dann auf Code).
Gruß
Jürgen
AW: Klick auf Zelle -> Makro auslösen
Monika
Du kannst eine Steuerelent-Toolbox einfügen ( z.B. Option Button).
Durch Doppelklick darauf öffnet sich das VBA-Fenster, hier kannst Du Dein
Makro einfügen.
Klickst Du dann auf den Option Button, wird das Makro ausgeführt.
Grüsse, Monika
Anzeige
Was ist da falsch?
19.10.2004 18:02:39
Michal
Ich hab nun mal ein kleines Makro geschrieben:
Was ist daran falsch?
------

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Value = ChrW(161) Or ChrW(164) Then
zeile = ActiveCell.Row
Cells(4 And 5 And 6 And 7 And 8, zeile).Value = ChrW(161)
ActiveCell.Value = ChrW(164)
End If
End Sub

--------
Es kommt immer der Fehler:
"Run-time error '13' , Type mismatch"
Anzeige
AW: Was ist da falsch?
Reinhard
Hi Michal,
was willst du denn machen?
Übrigens hat cells die Syntax Cells(Zeile,Spalte) und
4 and 5 and 6 ergibt m.E. immer 1
Die If Abfrage würde ich so schreiben:
If ActiveCell.Value = ChrW(161) Or ActiveCell.Value = ChrW(164)
oder
If Target.Value = ChrW(161) Or Target.Value = ChrW(164)
Gruß
Reinhard
Anzeige
AW: Was ist da falsch?
19.10.2004 18:36:13
Michal
Okay, die If-Abfrage funktioniert nun, danke vielmals :-)
Sorry dass ich nicht geschrieben habe was es bewirkt, bzw. bewirken sollte.
Wenn man auf eine Zeile klickt, soll geprüft werden, ob eines der beiden Zeichen drin steht.
Wenn ja, dann sollen die 5 Zellen ("D" & zeile, "E" & zeile, "F" & zeile, "G" & zeile, "H" & zeile) mit "¢" gefüllt werden und die angeklickte Zelle darauf mit "¤"!
Wie schreib ich das dann besser, das
Cells(4 And 5 And 6 And 7 And 8, zeile).Value = "¢" ?
Gruss Michal
Anzeige
AW: Was ist da falsch?
19.10.2004 18:37:45
Michal
Sorry, ist noch offen! (Frage im obigen Beitrag)
AW: Was ist da falsch?
Reinhard
Hi Michal,
probier mal:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Target.Value = ChrW(161) Or Target.Value = ChrW(164) Then
zeile = ActiveCell.Row
Range("D" & zeile & ":H" & zeile).Value = ChrW(161)
ActiveCell.Value = ChrW(164)
End If
End Sub

Gruß
Reinhard
Anzeige

Forumthreads zu verwandten Themen

Klick auf Zelle
Manu

Hallo
ich möchte eine Excelliste entwerfen, die jedoch nur über ein Formular gefüllt werden kann. Um das editieren eines Eintrags zu vereinfachen, soll der Nutzer einfach nur auf eine Zelle klicken. Das Blatt ansich ist gesperrt, es können nur Zellen ausgewählt werden, jedoch nicht bearbei...
13.12.2008 00:44:40
Thread-ID: 1032548
2 Beiträge
Klick auf Zelle
Manu

Hallo
ich möchte eine Excelliste entwerfen, die jedoch nur über ein Formular gefüllt werden kann. Um das editieren eines Eintrags zu vereinfachen, soll der Nutzer einfach nur auf eine Zelle klicken. Das Blatt ansich ist gesperrt, es können nur Zellen ausgewählt werden, jedoch nicht bearbei...
13.12.2008 01:06:00
Thread-ID: 1032553
4 Beiträge
Anzeige
Automatischer Eintrag durch Doppelklick auf Zelle
Micha

Hallo liebe Spezialisten,
nachdem mir vorhin so Super in diesem Forum geholfen wurde, hier gleich die nächste Frage:
Ist es möglich, das in einem bestimmten Tabellenbereich mir durch einen Doppelklick auf eine Zelle automatisch ein "x" in diese Zelle eingegeben wird?
Würde mich über...
12.02.2009 15:30:00
Thread-ID: 1050071
5 Beiträge
Anzeige
Doppelklick auf zelle mit eigenem Namen
chris

Hallo VBA Experten,
habe hier eina kurze frage.
Würde mich wie immer über Hilfe freuen.
Ich habe eine Zelle Z.b L8
diese zelle hat den Namen "testzelle_8"
Ist es jetzt möglich irgendwie an diesen Namen zu kommen.
Also wenn ich die zelle Doppelklicke das dann der Name aus...
09.03.2010 16:42:23
Thread-ID: 1144625
10 Beiträge
Message bei Klick auf bestimmte Zellen
bastula

Liebe Excel-Experten,
ich möchte einen bestimmten Range eines Sheets zur Berarbeitung sperren, in dem restlichen Bereich soll in dem Moment, wo man auf eine Zelles dieses Bereiches klickt, eine MessageBox mit einer Warnung kommen.
Ich habs mit: Private Sub Worksheet_SelectionChange(ByVa...
28.04.2010 19:43:13
Thread-ID: 1154356
8 Beiträge
Bei Klick auf Zelle Macro ausführen
Benedikt

Guten Abend zusammen
Nachfolgender Code funktioniert einwandfrei, aber ist in jeder Zelle des Arbeitsblatt aktiv: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Call Macro 1 End Sub
Wie kann ich Ihn auf die Zellen B24 bis B50 beschränken?
Vielen D...
01.05.2010 19:06:32
Thread-ID: 1154879
4 Beiträge
KLICK auf Zelle - User-Form Show
Edwin

Wie kann ich durch einen Klick auf eine Zelle erreichen, daß eine User-Form geöffnet wird.
01.05.2002 23:24:48
Thread-ID: 117688
4 Beiträge
Anzeige
Klick auf Zelle?
Manuel

Hallo,
wie kann ich ein userform bei Klick in eine Zelle eines Worksheet öffnen ? Ferner sollte ich denn Zellinhalt und die Koordinaten der Zelle wissen um geänderte Werte meiner userform in eben diese Zelle zurückschreiben zu können.DankeManuel

16.05.2002 02:02:11
Thread-ID: 121191
1 Beitrag
per Mausklick Zelle mit gleichem Inhalt anspringen
Fritz_W

Hallo VBA-Experten,
ich bitte um eure Hilfe beim Realisieren folgenden Vorhabens:
Ich möchte, dass wenn ich eine Zelle des Zellbereichs J1:J15 anklicke und diese Zelle nicht den Text "" aufweist, dass daraufhin diejenige Zelle im Tabellenblatt aktiviert wird, die den gleichen Textinhalt...
18.07.2011 18:44:58
Thread-ID: 1222635
6 Beiträge
Bei Klick auf Zelle, soll Standardwert erscheinen
stefanseevetal

Hallo liebe Excel-Experten!
Ich habe eine kurze Frage: Wie bekomme ich es hin, dass in einer Zelle automatisch der Buchstabe "j" steht, sobald ich die Zelle anklicke?
Danke und viele Grüße
Stefanseevetal
19.08.2011 19:41:10
Thread-ID: 1226819
2 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.05.2026 19:23:24
VBA - Blattschutz lässt sich mit Code nicht ausschalten
17.05.2026 13:47:03
Laufende Uhrzeit in einer Zelle
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum