hyperlink

13/10/2009 - 10:37 von JDorn | Report spam
Hallo ng

Wie kann ich den gesamten String

File:///\\Ikt-nt06\IKTDATEN\7_Projekte\2286_GeoreferenzierteIKT_Projekte\Daten\Bibliothek\Verküpfungen\16.xls
eines Hyperlinks der in der Zelle als
..\Bibliothek\Verküpfungen\16.xls

angezeigt wird als dbaseFile ablegen, exportieren.
Mir geht die gesamte Info immer verloren.
Wie müsste ich das machen

Johann Dorner
 

Lesen sie die antworten

#1 Andreas Killer
13/10/2009 - 12:19 | Warnen spam
On 13 Okt., 10:37, "JDorn" wrote:

Wie kann ich den gesamten String

File:///\\Ikt-nt06\IKTDATEN\7_Projekte\2286_GeoreferenzierteIKT_Projekte\Da­ten\Bibliothek\Verküpfungen\16.xls
 eines Hyperlinks der in der Zelle als
      ..\Bibliothek\Verküpfungen\16.xls

angezeigt wird als dbaseFile ablegen, exportieren.


Äh exportieren? Wie, Wohin?

Wandeln ihn doch in den absoluten Namen um, dann bleibt er wie er ist.

Andreas.

Sub AbsoluteHyperLinks()
Dim fs As Object, H As Hyperlink
Set fs = CreateObject("Scripting.FileSystemObject")
For Each H In ActiveSheet.Hyperlinks
H.Address = fs.GetAbsolutePathName(H.Address)
Next
End Sub

Ähnliche fragen