activeCell.FormulaR1C1 = "=SUM(" & activeCell.Offset(0, -2).Address & "+" & activeCell.Offset(0, -4).Address & "+" & activeCell.Offset(0, -6).Address & "+" & activeCell.Offset(0, -8).Address & "+" & activeCell.Offset(0, -10).Address & ")"

1 ответ1

1

Скорее, чем

activeCell.Offset(0, -2).Address

использовать этот,

activeCell.Offset(0, -2).Address(RowAbsolute:= False, ColumnAbsolute:= False)

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .