Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
824to828
824to828
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nur zwei Zellen statt ganze Spalte aktivieren

Forumthread: Nur zwei Zellen statt ganze Spalte aktivieren

Nur zwei Zellen statt ganze Spalte aktivieren
27.11.2006 22:36:02
bully
Hallo Leute,
ich möchte folgenden Code so anpassen, dass der Kalender nicht bei jeder Zelle der Spalte L eingeblendet wird, sonder nur bei den Zellen L1 und L2. Leider bringe ich es ohne eure Hilfe nicht fertig!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 12 Then Kalender.Show
End Sub

Die Lösung wird wohl einfach sein, denke ich, aber ich komm nicht drauf!
Gruss bully
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nur zwei Zellen statt ganze Spalte aktivieren
27.11.2006 22:40:50
Kurt 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.address = "$L$1" or _
Target.address = "$L$2" Then Kalender.Show
End Sub

mfg Kurt
AW: Nur zwei Zellen statt ganze Spalte aktivieren
27.11.2006 22:41:22
Reinhard
Hi Bully,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.address="$L$1" or Target.address="$L$2" Then Kalender.Show
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Nur zwei Zellen statt ganze Spalte aktivieren
27.11.2006 22:43:48
Matthias
Hallo Bully,
oder auch so:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("L1:L2")) Is Nothing Then
Kalender.Show
Else
Kalender.Hide
End If
End Sub

Gruß Mathias
AW: Nur zwei Zellen statt ganze Spalte aktivieren
27.11.2006 23:20:14
bully
Hallo Mathias, Reinhard und Kurt,
eure schnellen Antworten haben mich fast überrumpelt! Danke euch dreien. Ich habe die Variante von Mathias verwendet, sie lief auf Anhieb ohne Fehler.
Nochmals danke an alle!
Gruss bully
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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