Userform bei Klick
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Betrifft: Userform bei Klick
von: Chris
Geschrieben am: 12.10.2003 13:12:36
Hilfe,
habe eine Tabelle (Kalender)
bei klick in eine Zelle soll eine Userform aufgehen
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Address = "$D$5" Then
UserForm1.Show
End If
End Sub
Bei diesem Script wird aber nur bei klick auf D5 eine Userform geöffnet, wie schaffe ich das, dass der Bereich D5:AN16 ancklickbar ist und auch nur dann, wenn er eine Zahl enthält ????
Betrifft: AW: Userform bei Klick
von: Josef Ehrensberger
Geschrieben am: 12.10.2003 13:26:28
Hallo Chris,
das müsste funzen.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Intersect(Target,[D5:AN16]) Is Nothing Then Exit Sub
If IsNumeric(Target) Then
UserForm1.Show
End If
End Sub
Gruß Sepp
Betrifft: AW: Userform bei Klick
von: Chris
Geschrieben am: 12.10.2003 13:32:48
Hi Sepp,
danke für Deine Hilfe, es soll aber genau umgedreht sein, jetzt macht er ne Userform auf, wenn kein Inhalt in einer Zelle ist. Die Userform soll nur dann aufgehen, wenn eine Zahl drin steht :-)
Chris
Betrifft: If IsNumeric(Target) And Target > "" Then
von: Josef Ehrensberger
Geschrieben am: 12.10.2003 13:46:17
kleine ergänzung.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Intersect(Target, [D5:AN16]) Is Nothing Then Exit Sub
If IsNumeric(Target) And Target > "" Then
UserForm1.Show
End If
End Sub
Gruß Sepp
Betrifft: AW: Userform bei Klick
von: Chris
Geschrieben am: 12.10.2003 14:15:52
Hallo Sepp,
geht nicht. Nochmal:
Ich möchte, wenn sich eine Zahl in einer Zelle befindet sich durch klick auf diese eine Userform öffnet. Wenn sich keine Zahl in einer Zelle befindet keine Userform.
Chris
Danke
Betrifft: AW: Userform bei Klick
von: Josef Ehrensberger
Geschrieben am: 12.10.2003 14:46:17
hallo Chris,
bei mir gehts ohne probleme.
Bist du sicher das du zahlen in deinen zellen hast?
Oder vieleicht ein Datum?
Gruß Sepp
Betrifft: AW: Userform bei Klick
von: Chris
Geschrieben am: 12.10.2003 14:51:04
Ups,
es ist ein Datum es ist so formatiert: TT
was muss ich da einstellen ???
Gruss Chris
Betrifft: statt IsNumeric IsDate !!! o.T.
von: Josef Ehrensberger
Geschrieben am: 12.10.2003 14:54:55
ot
Beiträge aus den Excel-Beispielen zum Thema " Userform bei Klick"
Das Archiv des Excel-Forums
