Excelで数式によって参照されるすべてのセルを強調表示するにはどうすればよいですか？

この記事では、Excelの数式で参照されているすべてのセルを強調表示する方法について説明しています。 それを行うには、以下のXNUMXつの方法に従ってください。

ショートカットキーを使用して、数式で参照されているすべてのセルを強調表示します
VBAコードを含む数式で参照されているすべてのセルを強調表示します

ショートカットキーを使用して、数式で参照されているすべてのセルを強調表示します

このセクションでは、ショートカットキーを使用して、数式で参照されているすべてのセルを選択し、手動でそれらに色を塗りつぶすことをお勧めします。

1. E1が数式セルであり、それによって参照されたすべてのセルを強調表示する必要があるとします。 数式セルE1を選択し、を押してください Ctrlキー + [ （角括弧を開く）キーを同時に押します。

2.この数式で参照されているセルが選択されたので、塗りつぶしの色を指​​定して強調表示してください。 スクリーンショットを参照してください：

VBAコードを含む数式で参照されているすべてのセルを強調表示します

VBAコードを実行して、Excelの数式で参照されたすべてのセルを強調表示することもできます。

1。 押す 他の + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウをクリックしてください インセット > モジュール。 次に、以下のVBAコードをコピーしてモジュールウィンドウに貼り付けます。

VBAコード：Excelの数式で参照されているすべてのセルを強調表示します

Sub HighlightCellsReferenced()
    Dim rowCnt As Integer
    Dim i As Integer, j As Integer, strleng As Integer
    Dim strTxt As String, strFml As String
    Dim columnStr, cellsAddress As String
    Dim xRg As Range, yRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Please select formula cell(s)...", _
    Title:="Kutools For Excel", Type:=8)
    
    strTxt = ""
    Application.ScreenUpdating = False
    For Each yRg In xRg
        If yRg.Value <> "" Then
            strFml = yRg.Formula + " "
            strFml = Replace(strFml, "(", " ")
            strFml = Replace(strFml, ")", " ")
            strFml = Replace(strFml, "-", " ")
            strFml = Replace(strFml, "+", " ")
            strFml = Replace(strFml, "*", " ")
            strFml = Replace(strFml, "/", " ")
            strFml = Replace(strFml, "=", " ")
            strFml = Replace(strFml, ",", " ")
            strFml = Replace(strFml, ":", " ")
              
            For j = 1 To Len(strFml)
                If Mid(strFml, j, 1) <> " " Then
                    cellsAddress = cellsAddress + Mid(strFml, j, 1)
                Else
                    On Error Resume Next
                    Range(cellsAddress).Interior.ColorIndex = 3
                    cellsAddress = ""
                End If
            Next
        End If
    Next yRg
    Application.ScreenUpdating = True
End Sub

3。 プレス F5 コードを実行するためのキー。 ポップアップで Kutools for Excel ダイアログボックスで、参照されているセルを強調表示する必要がある数式セルまたは複数の数式セルを選択して、[ OK ボタン。 スクリーンショットを参照してください：

これで、選択した数式セルに基づいて参照されているすべてのセルが、下のスクリーンショットに示すようにすぐに赤で強調表示されます。

関連記事:

• Excelで数式セル参照を一定に保つ方法は？
• Excelのセルでタブ名を参照するにはどうすればよいですか？