wie kann ich per Makro mir alle Verknüpfung einer Mappe ausgegeben lassen?
Mir genügt dabei einfach die Ausgabe der Datei, wie es zum Beispiel unter Menü Bearbeiten - Verknüpfungen gemacht wird.
Danke Euch vielmals.
Steffen Schmerler
Sub Show_ext_Links()
Dim i As Long, msgStr As String
Dim extLinks
msgStr = ""
extLinks = ThisWorkbook.LinkSources(xlExcelLinks)
If Not IsEmpty(extLinks) Then
For i = 1 To UBound(extLinks)
msgStr = msgStr & extLinks(i) & vbCrLf
Next i
MsgBox msgStr, vbInformation + vbOKOnly, "Externe Links in dieser Mappe"
End If
End Sub
Die 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