Worksheet_SelectionChange
26.07.2004 09:28:26
geri
möchte bei zwei Zellen Ereignis auslösen "start"
sehe Lösung aber nicht
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim start As Integer
start = Range("A1,A10") '?
If ActiveCell = (start) Then xy.Show
End Sub
Danke für Lösungsansatz
gruss geri