wenn ActiveWorkbook.Styles("Hyperlink").BuiltIn = true, wie finde ich am einfachsten die Zelle welche mit diesem Style formatiert ist?
Gruß
Ralf
Sub testi()
Dim x As Range
For Each x In ActiveSheet.UsedRange
If x.Style.Name = "Hyperlink" Then
Debug.Print x.Address
End If
Next
End Sub
Schöne Grüße