externe Verknüpfungen anzeigen

[Rabe]

Hi,

ich habe eine Mappe mit 4 Arbeitsblättern, die aufgrund von Rumkopiererei Verknüpfungen zu einer anderen Datei haben. Diese will ich mir anzeigen lassen und dann anpassen.

Wie kann ich mir diese Verknüpfungen zeigen/auflisten lassen?

[WillWissen]

Hi Ralf,

schau mal unter Daten, ob der Punkt Verknüpfungen bearbeiten aktiviert ist. Dort müssten die Verknüpfungen gelistet sein.

[Rabe]

Hi Günter,

ja, ist er, da komme ich dann in das normale Verknüpfungsfenster, wo ich eine neue Datei auswählen oder die Verknüpfung aktualisieren oder löschen kann.
Ich will aber die Formeln sehen, die auf die andere Datei verweisen.

[Fennek]

Hallo,

aus dem Archiv: alle Formeln mit links zu anderen Dateien finden:

Code:

Sub Formel_link()
Dim rng As Range
For Each Sht In ActiveWorkbook.Sheets
    On Error Resume Next
    With Sht.UsedRange.SpecialCells(3)
    If Err.Number <> 0 Then Err.Clear: GoTo fin
        Set rng = .Find("[", , xlFormulas, xlPart)
        If Not rng Is Nothing Then
            Ad = rng.Address
            Do
            Debug.Print Sht.Name, rng.Address, rng.Formula
            Set rng = .FindNext(rng)
            Loop Until rng.Address = Ad
        End If
    End With
fin:
Next Sht
End Sub

mfg

[Rabe]

Hi,

danke!
Da wurde nichts angezeigt, dann habe ich halt einfach die Datei-Verknüpfung gelöscht.

[schauan]

Hallöchen,

mal noch ein Hinweis. Das Makro sucht nur in Formeln, ob Verknüpfungen vorhanden sind.
Verknüpfungen können aber auch über mit kopierte Namensdefinitionen kommen, Gültigkeiten, bedingten Formatierungen oder da sind mal Bereiche, in die externe Daten eingefügt wurden.