Macro não está cooperando com cotações no Excel VBA

Question

Eu tenho uma macro contendo uma linha que mudará a fórmula de uma célula usando o tipo de fórmula R1C1.

A fórmula é:

    ActiveCell.FormulaR1C1 = _
    "=IF(R[0]C[-2]=0,"",(R[0]C[-20]-R[0]C[-16]))"

Sempre que tento executar a macro, sempre aparece uma caixa de diálogo dizendo

    Run-time error '1004':
    Application-defined or object-defined error.

E quando você clica em depurar, destaca essas duas linhas na macro. E eu não consigo descobrir como consertar isso. Alguém pode ajudar?

    

Answer 1

você está perdendo um colchete de fechamento

ActiveCell.FormulaR1C1 = _
    "=IF(R[0]C[-2]=0,"""",(R[0]C[-20]-R[0]C[-16]))"

Editar: corrigido para colocar "" na fórmula

    

Answer 2

Seu problema parece ser as aspas, você tentou alterar ou escapar das aspas?

    

Answer 3

Tente usá-lo:

   ActiveCell.FormulaR1C1 = _
    "=IF(R[0]C[-2]=0," & Chr(34) & Chr(34) & ",(R[0]C[-20]-R[0]C[-16]))"

Lembre-se de que esta fórmula não pode ser colocada antes da coluna 20 ou será gerado um erro.