in einem selektierten Bereich sind leere Zellen als auch Zellen mit Text enthalten.
Wie kann ich per VBA die Texte (http://......de) in einen Hyperlinks umwandeln (ohne zusätzliche Formel /Hilfsspalte)?
Danke, ciao Jörg
Sub Selection2Hyperlinks()
Dim rC As Range
For Each rC In Selection
If rC.Text "" Then
rC.Hyperlinks.Add rC, rC.Text, , , rC.Text
End If
Next rC
End Sub
Gruess HansueliDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen