Hur man får en lista över alla externt länkade mappar i Excel
Vill du veta vilka arbetsböcker en tabell innehåller externa länkar till? Använd följande makro för att skapa en lämplig tabell under makrokontroll:
Lista underlänkar ()
Dim NewTable As Worksheet
Dim List som variant
Dim i As Integer
Dim a som sträng
List = ActiveWorkbook.LinkSources (xlExcelLinks)
If Not IsEmpty (List) Då
Ange NewTable = ActiveWorkbook.Worksheets.Add
För i = 1 Till UBound (lista)
NewTable.Cells (i, 1) = List (i)
Nästa i
Annan
a = MsgBox ("Inga genvägar hittades!", vbOKOnly, "Obs")
Avsluta om
Avsluta Sub
Makrot skapar en ny, tom tabell i den aktiva arbetsboken och listar alla arbetsböcker som är länkade externt i celler. Varje sökväg visas bara en gång - så du får en så kompakt översikt som följande bild visar:
Om inga externa länkar hittas kommer Excel att indikera detta med ett motsvarande fönster:
Makrot använder samlingen LinkSources. De enskilda posterna i den här listan överförs till celler i ett nytt kalkylblad.
