Установите формулу, которая будет ячейкой диапазона (например, A1) против содержимого A1

Question

Я пытаюсь настроить макрос, который вставляет текст перед ячейкой рядом с ее содержимым. Проблема в том, что код копирует содержимое ячейки рядом с ним, но затем я не могу перетащить формулу вниз, чтобы продолжить ее. Я хочу, чтобы формула заканчивалась в A1, а не в содержимом A1, которое равно 1111. Например, формула обычно, ="ADDTOFRONT"&A1но теперь она="ADDTOFRONT"&1111

Например:

'''''PUBLICVARS'''''
Public cll As Variant
Public clloffset As Variant

'''''ENDPUBVARS'''''
'''''MAINSUB'''''
Public Sub Add_BINWH()

cll = Application.InputBox(Prompt:="Which Cell To Add Formula? Eg: B1", Default:="B1")
Set clloffset = Range(cll).Offset(0, -1)
ActiveWorkbook.ActiveSheet.Range(cll).Formula = "=" & Chr(34) & "ADDTOFRONT" & Chr(34) & "&" & clloffset.Value

End Sub
'''''ENDMAINSUB'''''

Answer 1

Вам нужно указать в строке адрес, а не значение.

clloffset.Value

Должно быть

clloffset.Address(0,0)