View Single Post
 
Old 04-28-2017, 06:54 AM
dherr dherr is offline Windows 8 Office 2007
Advanced Beginner
 
Join Date: Nov 2014
Location: Austria
Posts: 45
dherr is on a distinguished road
Default

Hi,,
also zumindest das Herausfinden der Link-Adresse lässt sich mit folgendem kleinen Makro machen:
Code:
Sub Makro1()
    Range("A1").Select
    adr = Selection.Hyperlinks(1).Address
    Range("A1").Select
    Selection.Value = adr
End Sub
Nun müsste man diesen Link auch als Text in CSV schreiben können.

Grüße-
Dietrich
Reply With Quote