Private Sub Worksheet_SelectionChange(ByVal Target As Range)
....Dim Bereich As Range Set Bereich = Range("E8:E1000")
........If Target.Column = 5 Then
...-------> If Target.Value "" Then ..............usrfrm_Grenzwerte.Show
.............. End If
........End If
End Sub
Allerdings funktioniert das nur solange man genau eine Zelle mit Inhalt anwählt. Wählt man mehrere Zellen an (egal ob alle gefüllt, alle leer oder sowohl als auch sind) hängt er sich an der oben markierten Stelle auf. Ich möchte, dass man z.B mehrere Zellen in der Spalte "E" wählen kann und sich (wenn eine oder mehrere davon mit Text gefüllt sind) die Userform öffnet. Wie kann ich das am besten realisieren?
Vielen Dank im Voraus und beste Grüße Vince