Přejít k hlavnímu obsahu

Jak najít a vypsat všechny odkazy (externí odkazy) v aplikaci Excel?

Autor: Kelly Naposledy změněno: 2024-11-01

V Excelu odkazujete na obsah buněk v jiném sešitu vytvořením externího odkazu. Ale když chcete vypsat všechny odkazy na sešit v Excelu, zdá se těžké najít a vypsat všechny externí odkazy (odkazy). Záludný způsob v tomto článku vám pomůže rychle najít a vypsat všechny odkazy v sešitu.

Najít a vypsat všechny odkazy pomocí příkazu Najít

Najít a zobrazit všechny odkazy s Kutools for Excel

Najděte a vypsejte všechny odkazy pomocí makra VB


šipka modrá pravá bublina Najít a vypsat všechny odkazy pomocí příkazu Najít

Protože externí odkazy obsahují závorku [ znamení, můžeme zjistit externí odkazy, pokud můžeme získat všechny značky závorek v celém sešitu.

1. klikněte Home > Najít a vybrat > Najít k otevření Najít a nahradit dialogové okno. Můžete také otevřít Najít a nahradit dialogové okno se stiskem Ctrl + F klíče.

2. v Najít co: pole, zadejte levou část znaku závorky "[".

zadejte levou část závorky do pole Najít

3. klikněte možnosti, V roce V rozevírací seznam vyberte List or Cvičebnice ze kterého chcete najít odkazy. Viz screenshot:

vyberte List nebo Sešit, ze kterých chcete najít odkazy

4. A pak klikněte na tlačítko Najít vše knoflík. Poté uvádí všechny externí odkazy v souboru Najít a nahradit dialogové okno okamžitě. lis Ctrl +  vybrat všechny buňky odkazu podle následujícího zobrazení:

jsou uvedeny všechny externí odkazy, stisknutím Ctrl + A vyberte všechny buňky odkazu

Levá část znaku závorky může zjistit externí odkazy v celém sešitu. Pokud chcete zjistit všechny druhy odkazů, včetně interních a externích, můžete zadat vykřičník „!"v Najít to, co: krabice.


šipka modrá pravá bublina Najít a zobrazit všechny odkazy s Kutools for Excel

S Kutools for ExcelJe Najděte a rozbijte nefunkční odkazy, můžete najít všechny externí odkazy aktivního listu, zároveň můžete jednotlivé odkazy podle potřeby přerušit.

Kutools for Excel nabízí více než 300 pokročilých funkcí pro zefektivnění složitých úkolů, zvýšení kreativity a efektivity. Itegarujte se schopnostmi AI, Kutools automatizuje úkoly s přesností, čímž usnadňuje správu dat. Podrobné informace o Kutools for Excel...         Zkušební verze zdarma...

Pokud jste nainstalovali Kutools for Excel, udělejte prosím toto:

1. Aktivujte list, který chcete najít, a klikněte na Kutools > Odkaz > Najděte a rozbijte nefunkční odkazy, viz screenshot:

klikněte na Find and Break Broken Links funkce kutools

2. v Najděte a rozbijte nefunkční odkazy , klepněte na tlačítko OK Filtr z rozevíracího seznamu vyberte Všechny odkazya jsou uvedeny všechny odkazy v aktivním listu, můžete také zobrazit stav odkazů, OK znamená, že odkaz je platný, Chyba znamená, že odkaz je přerušen.

všechny odkazy jsou uvedeny v dialogovém okně

Poznámky:

1. V případě, že Zobrazit buňku Tato možnost je zaškrtnuta, když kliknete na odkaz v seznamu. Najde a přejde na konkrétní buňku, která obsahuje odkaz v listu.

2. A pokud chcete zrušit odkaz, můžete jej vybrat ze seznamu a kliknout na Přerušit odkaz.

Klikněte pro stažení Kutools for Excel a bezplatnou zkušební verzi hned teď!

Pokud se chcete o této funkci dozvědět více, klikněte prosím Najděte a rozbijte nefunkční odkazy.


šipka modrá pravá bublina Najděte a vypsejte všechny odkazy pomocí makra VB

Následující makro VBA nám může pomoci vypsat všechny propojené zdrojové sešity v novém listu aktuálního sešitu.

1. Podržte stisknuté tlačítko ALT + F11 kláves a otevře se okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující makro do okna modulu.

VBA: Seznam všech odkazů v aplikaci Excel.

Sub ListLinks()
    Dim xSheet As Worksheet
    Dim xRg As Range
    Dim xCell As Range
    Dim xCount As Long
    Dim xLinkArr() As String
    On Error Resume Next
    For Each xSheet In Worksheets
        Set xRg = xSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
        If xRg Is Nothing Then GoTo LblNext
        For Each xCell In xRg
            If InStr(1, xCell.Formula, "[") > 0 Then
                xCount = xCount + 1
                ReDim Preserve xLinkArr(1 To 2, 1 To xCount)
                xLinkArr(1, xCount) = xCell.Address(, , , True)
                xLinkArr(2, xCount) = "'" & xCell.Formula
           End If
        Next
LblNext:
    Next
    If xCount > 0 Then
        Sheets.Add(Sheets(1)).Name = "Link Sheet"
        Range("A1").Resize(, 2).Value = Array("Location", "Reference")
        Range("A2").Resize(UBound(xLinkArr, 2), UBound(xLinkArr, 1)).Value = Application.Transpose(xLinkArr)
        Columns("A:B").AutoFit
    Else
        MsgBox "No links were found within the active workbook.", vbInformation, "KuTools for Excel"
    End If
End Sub

3. Stiskněte F5 klíč ke spuštění tohoto makra. Poté vytvoří nový list s názvem jako Propojovací list a vypsat všechny umístění odkazů a názvy sešitů zdrojových sešitů a uložit do nich cesty najednou. Viz screenshot:

vba kód pro seznam všech odkazů v listu


šipka modrá pravá bublina Najít a zobrazit všechny odkazy s Kutools for Excel

 

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  vzývat Kutools Funkce...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více
Použijte Kutools ve vašem preferovaném jazyce – podporuje angličtinu, španělštinu, němčinu, francouzštinu, čínštinu a více než 40 dalších!

Vylepšete si své excelové dovednosti s Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab Přináší do Office rozhraní s kartami a výrazně vám usnadňuje práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!