如何基于相邻单元格的编号引用更新多个单元格中的公式

Question

我有一个文件，用于显示实体地板上的销售地点。这些单元格通过从另一个工作表返回值来显示各种索引;与这些位置相邻的是位置编号，范围是1到250，可以在该位置的左侧，上方，右侧或下方。我正在寻找基于填充到相邻单元格中的位置编号更新位置单元格中公式的最佳方法，例如，如果在运行宏时位置从2更改为3，则位置公式应从= TOTALS！$ V $ 11到= TOTALS！$ V $ 12，其中$ V $ 12来自位置3 + 9行。

我可以提供示例文件

尝试了Interior.ColorIndex，R1C1公式等。

从识别颜色开始，未进入公式部分。

Sub Test1()

'white is -4142
'pink color index 38
'green  color index 10
'red color index 3
'turcoise color index 8
'yellow color index 6
'blue color index 5
'purple color index 13

Selection.Offset(0, -1).Select

Range(Left(Selection.Address, InStr(Selection.Address, ":") - 1)).Interior.ColorIndex


For Each possValue In Selection

    If Selection.Interior.ColorIndex = 5 Or Selection.Interior.ColorIndex = 38 Then
        If Left(Selection.Offset(0, -1).Address, InStr(Selection.Offset(0, -1).Address, ":") - 1).Interior.ColorIndex = -4142 And Left(Selection.Offset(0, -1).Address, InStr(Selection.Offset(0, -1).Address, ":") - 1).HasFormula = False Then

            MsgBox Left(Selection.Offset(0, -1).Address, InStr(Selection.Offset(0, -1).Address, ":") - 1).Value

        End If

    End If

Next possValue

End Sub

我有一个文件，用于显示实体地板上的销售地点。这些单元格通过从另一个工作表返回值来显示各种索引;与这些位置相邻的是位置编号，范围是1到250，可以在该位置的左侧，上方，右侧或下方。我正在寻找基于填充到相邻单元格中的位置编号更新位置单元格中公式的最佳方法，例如，如果在运行宏时位置从2更改为3，则位置公式应从= TOTALS！$ V $ 11到= TOTALS！$ V $ 12，其中$ V $ 12来自位置3 + 9行。