Wiedermal wahrscheinlich nur ne Kleinigkeit:
So funktioniert der Code leider nicht
If ActiveCell = "ü" And ActiveCell.Offset(0, 3) > "" And "-" Then
So schon
If ActiveCell = "ü" And ActiveCell.Offset(0, 3) > "" Then
Wenn also in der angefragten Zelle nichts steht, oder nur ein Bindestrich, soll die Aufgabe nicht ausgeführt werden. Auch mit Or statt And habe ich es versucht.