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?
Hi Ralf,
schau mal unter Daten, ob der Punkt Verknüpfungen bearbeiten aktiviert ist. Dort müssten die Verknüpfungen gelistet sein.
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.
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
Hi,
danke!
Da wurde nichts angezeigt, dann habe ich halt einfach die Datei-Verknüpfung gelöscht.
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.