Excel：壊れたリンクを見つけて修正する方法

非労働リンクはワークシートに大混乱を引き起こしていますか？心配しないでください！このチュートリアルでは、壊れたExcelリンクを見つけて修正する3つの簡単な方法に加えて、追加のボーナスとして独自のワンクリックソリューションを教えてください:)

Excelセルは、多くの場合、他のワークブックにリンクして、そこから関連情報を引き出すことができます。ソースワークブックが削除、再配置、または破損した場合、そのファイルへの外部参照が分解し、フォーミュラがエラーの返信を開始します。明らかに、式を修正するには、壊れたリンクを見つける必要があります。問題はどうですか？答えは以下に続きます:)

• Excelで壊れたリンクを見つけて修正します
• 見つけて交換して、無効なリンクを識別して修正します
• VBAコードを使用してリンクが壊れていることを確認してください
• 壊れたリンクを見つけるための特別なアドイン

Excelで壊れたリンクを見つけて修正します

他のワークブックへの非労働リンクを検出するには、次の手順を実行します。

1. [データ]タブの[ [Queries＆Connections]グループの[編集]ボタンをクリックします。

   このボタンが灰色になっている場合、それはあなたのワークブックに外部参照がないことを意味します。

   

2. [リンクの編集]ダイアログボックスでは、現在のワークブックが参照しているすべての外部ソースのリストを表示できます。このウィンドウが初めて開かれたとき、すべてのリンクにステータスが不明になります。ステータスを明確にするには、右側の[ステータス]ボタンをクリックします。

   

3. 情報が更新されたら、各リンクのステータスを確認します。便利な場合は、ステータス列のヘッダーをクリックして、それに応じてレコードをソートすることができます。

   明らかに、エラーと診断されたリンク：発見されていないソースは壊れています。私のワークブックには、そのようなリンクが2つあります。

   

4. 先に進み、壊れたリンクを修正しましょう。この場合、エラーを報告するソースを選択し、右側の変更ソースボタンをクリックします。

   

5. 開いている変更ソースウィンドウで、正しいワークブックを見つけるまでコンピューターのフォルダーをナビゲートし、選択して[OK]をクリックします（またはワークブックをダブルクリックします）。

   

6. 問題のあるソースごとに上記のステップを個別に繰り返します。完了したら、 [閉じる]ボタンをクリックします。

すべての誤ったソースを修正した後、リンクのリストが実際に短くなっていることに気付くかもしれません。その理由は、あなたが同じワークブックの複数の出来事があった可能性があり、ソースを変更した後、誤ったものがリストから消えたからです。

たとえば、同じファイルを参照している次のペアがありました。ColradoReport.XLSX （スペルミス）およびColorado Report.XLSX （正しい）。 Florida_Report.xlsx（存在しない）およびFlorida Report.xlsx （正しい）。リンクを修正した後、誤ったソースがなくなり、このリストがあります。

壊れたリンクを見つけて修正し、検索と交換します

上記の編集リンク機能は、ワークブック内のすべての外部ソースのリストをすばやく取得するのに役立ちますが、どのセルにそれらの外部参照が含まれているかは表示されません。このようなセルを識別するには、Excelの発見と交換を使用できます。

すべてまたは特定のワークブックへの壊れたリンクを見つけます

外部リンクは、.xls、.xlsx、.xlsmなどのファイル拡張機能の一部として「.xl」を持つ別のExcelファイルを常に指します。外部ワークブックへの参照を検索するときに、この事実を利用できます。または、特定のワークブック名​​内で特定のテキスト（サブストリング）を検索することもできます。詳細な手順は以下に続きます。

1. Ctrl Fを押して、 [検索]と[交換]ダイアログを開きます。または、編集グループの[ホーム]タブで[検索と選択] > [検索]をクリックします。
2. ダイアログボックスの検索と交換ボックスで、 [オプション]ボタンをクリックします。
3. ワークブック内のすべての外部リンクを見つけたいかどうかに応じて、特定のファイルにのみ参照するかどうか、次の1つを入力してください。
   • すべてのリンクを検索するには、 .xlと入力します。
   • 特定のワークブックへのリンクを検索するには、そのワークブック名​​またはそのユニークな部分を入力します。
4. ボックス内で、すべてのタブまたはシートで検索するワークブックを選択して、現在のワークシートを調べます。
5. ボックスの外観で、式を選択します。
6. すべてのボタンをクリックします。

そして今が重要な部分です - 結果を分析します。

すべての外部参照を検索した場合は、値列のヘッダーをクリックして結果を値でソートし、リストを下にスクロールします。他のワークブックへの壊れたリンクには#refがあります！値列のエラー。

特定のワークブックへの参照を検索した場合は、結果を確認してください。

たとえば、要約レポートの一部のセルは、存在しないファイル（ Colrado Report.xlsx ）を指し示していることを知っており、どのセルを正確に知りたいと考えています。そこで、私たちは間違った単語Colradoを見つけて、どのボックスを見つけて、すべてを見つけます。その結果、Excelは2つの異なるシートに3つのそのような参照を表示します。 #ref！値列のエラーは、3つのリンクすべてが壊れていることを確認します。

注記。壊れたリンクを診断するこの方法は、100％信頼できません。たとえば、#ref！エラーは、ソースワークブックのリンクセル内の式によって返される場合があります。また、すべての結果をFindに表示されます。しかし、それは他のワークブックへの言及が壊れているという意味ではありません。したがって、このアプローチを使用すると、各エラーをクリックして参照を手動で再確認することができます。

特定のワークブックへの壊れたリンクを修正します

すべての結果を見つけるリストでは、任意のアイテムをクリックしてリンクを含むセルに移動し、それぞれを個別に編集できます。または、すべての機能を使用して、無効なリンクのすべての発生を一度に修正することもできます。方法は次のとおりです。

1. ダイアログボックスの検索と交換ボックスで、 [交換]タブに切り替えます。
2. どのボックスを見つけるか、誤ったファイル名またはパスを入力します。
3. ボックスに置き換えると、正しいファイル名またはパスを入力します。
4. [すべて交換]をクリックします。

注記。すべてのボタンを[交換]ボタンをクリックした後、 [値の値]ウィンドウが開いて、ソースワークブックを選択するように促す場合があります。それをしないで、何も選択せずにキャンセルをクリックしてください。

例として、間違ったワークブック名​​Colrado Report.xlsxを適切な1つのコロラドReport.xlsxに置き換えましょう。この特定のケースでは、1つの単語（ Colrado）の交換も機能します。ただし、指定されたテキストはパス文字列内のどこにでも置き換えられることに留意してください（ソースワークブックが現時点で閉じられている場合、ファイルへのフルパスが表示されます）。したがって、入力する小さなテキストの部分は、間違いの可能性が大きくなります。

交換が完了したら、#ref！結果からエラーが消え、代わりに通常の値が表示されます。

同様に、パスをソースファイルに置き換えることができます。たとえば、ソースワークブックが元々ドキュメントフォルダーにあり、その後、同じフォルダー内のレポートサブフォルダーに移動した場合、 \ documents \を\ documents \ Reports \に置き換えることができます。

誰かが壊れたリンクの問題を解決するために見つけて交換するのはばかげていると言うかもしれませんが、私が知っている限り、これは壊れたリンクを含むセルを見つけるのに役立つ唯一の組み込み機能です。

VBAとの壊れたリンクを確認してください

以下のコードは、ワークブック内のすべての外部リファレンスをループし、壊れているかどうかを把握しようとします。外部ファイルを見つけるために、 LinkSourcesメソッドを使用します。壊れたリンクを識別するために、 LinkINFOメソッドが使用されます。

Sub findbrokenLinks（）linksdataarray = activeworkbook.linksources （ xlexcellinks ） dim reportheaders （ ） as string dim rangecur as range dim sheetcur as workseet dim rowno as integer dim linkfilepath、linkfilepath2 、 linkfileName 'https://docs.microsoft.com/en-us/office/vba/api/excel.xllinkstatus dim sheetreportname as string sheetreportname = "broken linksレポート" linksstatusdescr = "file missing" reportheaders = split（ "worksheet、cell、workbook 、'" ） Application.screenUpdating = false application.calculation = xlcalculationmanual evaluate（ "isref（ '" ＆sheetreportname＆ "' '！a1）" ） anct clears else sheets.add.name = set setname end sheetreportname sheetreportname seetreportname eds crears ols sheets.crears.crears crears clears crears crears clears crears clears ols sheets.crears.crears.crears.crears.clears indi = 0からubound （reportheaders）sheetreport.cells（rowno、indi 1 ） = reportheaders（ indi ）activecur.name.name.name sheetheet.nameの各sheetcurの次のsheetcur > sheetreport.name ubound （linksdataarray）linkfilepath = linksdataarray（indi） 'linksroucesファイル名でフルファイルパスを返しますlinkfilepath = right（linkfilepath、len（linkfilepath） - instrrev（linkfilepath、 "\" ）） instrrev（linksdataarray（indi）、 "\" ））＆ "]＆ " [" ＆linkfileName＆ "] " '正方形の括弧内のワークブック名​​を備えたファイルパスlinksStatuscode = activeworkbook.linkinfo（ ctr （linkfilepath）、xllinkiningfile = linksingmissingfile and （Instr（rangecur.formula、linkfilepath）またはstrunt（rangecur.formula、linkfilepath2）） rowno = rowno 1 with sheetheport .cells（rowno、1）= sheetcur.name .cells（rowno、2）=置換（rangecur.address、 "$"、 "" "" "" "$ "。 " .hyperlinks.アンカー：=。セル（rowno、2）、address：= "" 、subaddress：= "'" ＆sheetcur.name＆ "'！" ＆rangecur.address .cells（rowno、3）= "'" ＆ rangecur.formula .cells（rowno、4）= linkfilepath .cells（rowno、5）= linksstatusdescr end ext oned for end for end for next indi for nextrangecur in rink in name、 rangecur.flingecure " linksStatusCode = -1 if 0 "[" ） then linkfilepath = leplage（right（right（namedrangecur.refersto、len（namedrangecur.refersto）-2）、 "] ）（0）、 " ["、 " xllinkinfostatus） end if xllinkstatusmissingfile = linksstatuscode and rowno = rowno 1 with sheetheport .cells（rowno、1）= sheetcur.name .cells（rowno、2）=置換（rangecur.address、 " 、 "、 " ）。アドレス：= "" 、subaddress：= "'" ＆sheetcur.name＆ "'！" ＆rangecur.address .cells（rowno、3）= "''" ＆rangecur.formula .cells（rowno、4）= linkfilepath if 0 thencels （rowno、5）= linksstatusdescr ext if end for nextrangecur end（extur "a ext for extの場合、 extが終了した場合、extが終了した場合にeditが終了する場合、 linksstatusdescr ）​​

無効なリンクのリストは、Broken Linksレポートという名前の新しいワークシートに出力されます。列Bには、リンクを含むセルへのハイパーリンクがあります。

独自のワークブックにコードを挿入するか、マクロを使用したサンプルファイルと、使用方法に関するステップバイステップの指示をダウンロードできます。

注記。このコードは、無効なワークブックへのリンク（存在しない、移動または削除された）のみを見つけますが、シートが欠落していません。その理由は、 linkinfoメソッドがファイル名のみをチェックするためです。シート名をチェックしようとすると、2015年エラーが発生します。

クリックしてExcelで壊れたリンクを見つけます

このチュートリアルの最初の部分を読みながら、1つのボタンをクリックして、ファイル内のすべての壊れたリンクを見つける簡単な方法がないことを少し落胆させるかもしれません。そのような解決策はExcelには存在しませんが、私たちがそれを自分で発展させることを妨げるものは何もありません:)

Ultimate Suiteのユーザーには、ワークブックまたは壊れたリンクのみですべての外部参照を見つけるためのワンクリックツールを提供します。検索リンクをクリックするだけですか？ [BITSツール]タブのボタンを使用すると、現在のワークブックにあるリンクのすべてのリンクのリストがすぐに表示されます。ここでは、無効なものが明るい赤で強調表示されます。リストを動作しないリンクに制限するには、[壊れたリンク]のみのチェックボックスを選択します。

アドインのペインでセルアドレスをクリックすると、特定のリンクを含むセルに移動します。それだけです！

上記のVBAコードとは異なり、アドインは、シートが欠落または誤っている場所を含むあらゆる種類の壊れたリンクを見つけます。

これは、Excelで壊れたリンクを確認する方法です。お読みいただきありがとうございます。来週のブログでお会いしましょう！

利用可能なダウンロード：

Ultimate Suite 14日間の完全官能バージョン（.exeファイル）VBAマクロ壊れたリンク（.xlsm）を見つける

以上がExcel：壊れたリンクを見つけて修正する方法の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。