Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1016to1020
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

UserForm aufrufen

UserForm aufrufen
28.10.2008 13:57:16
Stephan
Hallo zusammen,
ich habe mal wieder ein für euch sicherlich kleines Problem.
Mit dem Code soll eine UserForm aufgerufen werden, sobald eine Zelle im Bereich C3:C200 oder H3:H200 aktiviert wird. Aber das funktioniert nicht so ganz. Muss ich es vielleicht mit Row und Column versuchen?
Vielen Dank im Voraus!
Grüße, Stephan

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Range = ("C3:C200") Or Target.Range = ("H3:H200") Then
UserForm3.Show
End If
End Sub


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

Betreff
Datum
Anwender
Anzeige
AW: UserForm aufrufen
28.10.2008 14:07:00
Beverly
Hi Stephan,
versuchs mal so

If Not Intersect(Target, Union(Range("C3:C200"), Range("H3:H200"))) Is Nothing Then
UserForm3.Show
End If




AW: UserForm aufrufen
28.10.2008 14:08:00
JogyB

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("C3:C200")) Is Nothing Or Not Intersect(Target, ActiveSheet. _
Range("H3:H200")) Is Nothing Then
UserForm3.Show
End If
End Sub


Gruss, Jogy

AW: UserForm aufrufen
28.10.2008 14:19:31
Stephan
Vielen Dank an euch beiden für die fixe Hilfe!! Beide Vorschläge klappten auf Anhieb!! Und wieder was dazu gelernt! Grüße, Stephan
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige