回答:
セルをクリックして、F4を押します。F4を押し続けると、さまざまなレベルのアブソリュートが循環します。
例:
アドホックの多数のセルに対してこれを行う必要がある同様の問題を経験しました
そして、このコードは私の正気を救った:)
Sub selectedToAbsolute()
Dim c As Variant
For Each c In Selection
c.Value = Application.ConvertFormula(c.Formula, xlA1, , xlAbsolute)
Next c
End Sub
Sub selectedToRelative()
Dim c As Variant
For Each c In Selection
c.Value = Application.ConvertFormula(c.Formula, xlA1, , xlRelative, c)
Next c
End Sub