Estou tentando configurar uma macro que insere algum texto na frente da célula próximo ao seu conteúdo. O problema é que o código está copiando o conteúdo da célula próxima a ele, mas não consigo arrastar a fórmula para baixo para continuar. Quero que a fórmula termine em A1, não o conteúdo de A1 que é 1111. Por exemplo, a fórmula é normalmente, ="ADDTOFRONT"&A1
mas agora="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'''''
Responder1
Você deseja que o endereço seja colocado na string, não o valor.
clloffset.Value
Deveria estar
clloffset.Address(0,0)