Folgendes Problem in der Spalte A werden Hyperlinks gesetzt.Nun möchte ich, da wo ein Hyperling eingetragen wird in Spalte D in der selben Zeile ein x erscheint.
Danke für euere Hilfe
Tina
Function hyper(ByRef zelle As Range) As String
Application.Volatile
If zelle.Hyperlinks.Count > 0 Then hyper = "x"
End Function