Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1040to1044
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Selection innerhalb Bereich?

Selection innerhalb Bereich?
26.01.2009 10:30:00
Mathias
Hallo,
habe folgenden Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Bereich As Range
Set Bereich = Range("A1:A10")
If Not Intersect(Target, Bereich) Is Nothing Then MsgBox ("OK")
End Sub


Ich würde den Code gern so erweitern, dass nur dann die OK-Meldung kommt, wenn der markierte Bereich KOMPLETT in A1:A10 ist.
Hat jemand ´ne Idee? Vielen Dank schonmal.
Viele Grüße
Mathias

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

Betreff
Datum
Anwender
Anzeige
AW: Selection innerhalb Bereich?
26.01.2009 10:50:00
Andi
Hi,
zB so:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Bereich As Range
Set Bereich = Range("A1:A10")
If Not Intersect(Target, Bereich) Is Nothing Then
If Intersect(Target, Bereich).Address = Target.Address Then MsgBox ("OK")
End If
End Sub


Schönen Gruß,
Andi

ERLEDIGT: Selection innerhalb Bereich?
26.01.2009 13:00:35
Mathias
Hallo Andi,
vielen Dank. Funktionier bestens!!! :-)
Viele Grüße
Mathias
gern geschehen... (ot)
26.01.2009 13:02:06
Andi
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige