Gruppe
Extern
Problem
Ein Suchbegriff soll auf Herbers Excel-Server gesucht und die Fundstellen sollen im Browser angezeigt werden.
StandardModule: basMain
Sub SuchString()
Dim sSearch As String
sSearch = "https://www.herber.de/cgi-bin/searchstruct.pl?begriff="
sSearch = sSearch & Range("A1").Value
ActiveWorkbook.FollowHyperlink sSearch
End Sub