如何用宏在excel单元格中写入引用而不是值？

我想使用单元格引用（如 C++ 中的指针），而不是它们在 VBA 中的绝对值，这些单元格基于另一个值而变化。

我已经完成了以下操作，但是当我想要等效于例如Cells(x,y).Value时，它给了我绝对值。=$A$1$

Cells(8 + i, 6 + nbrVille).Value = Worksheets("Sheet1").Cells(2, 2).Value * Worksheets("Sheet1").Cells(7, 4 + j_Distances).Value

i = 0
For i_Distancia = 1 To nbrSitio
    For j_Distancia = 1 To nbrCiudad
        Cells(8 + i, 7 + nbrCiudad).Value = ">="
        Cells(8 + i, 8 + nbrCiudad).Value = Sheets("Distancia").Cells(i_Distancia, j_Distancia ).Value - 2
        Cells(8 + i, 6 + nbrCiudad).Value = Worksheets("Sheet1").Cells(2, 2).Value * Worksheets("Sheet1").Cells(7, 4 + j_Distancia).Value
        i = i + 1

    Next j_Distancia
Next i_Distancia

这对于为求解器进行动态约束是必要的。

目前宏给了我：

但我想要 ：