Hallo,
Hab folgendes Problem,
ich habe mehre Hyperlinks in einer Excel Tabelle untereinander
stehen (Spalte A). Jetzt muss ich mühselig jeden Link einzeln
anklicken und die Siete öffnet sich. Kann das ganze leider nur
im Internet Explorer laden. Gibt es da eine einfache
Möglichkeit?
Im Excel-Brett wird Dir Reinhard sofort ein Makro schreiben, das etwa so aussieht:
Public Sub goNav()
Dim ie as Object
Set IE = CreateObject("InternetExplorer.Application")
ie.visible = true
Dim x as integer
Dim links as Hyperlinks
Set links = ActiveSheet.Hyperlinks
For x = 1 to links.count
ie.navigate links.item(x).address,nothing, "\_blank"
next
End Sub
Keine Garantie, habe ich bloß irgendwo abkopiert.
Cheers, Felix