Guru do Excel e Power BI

Olá pessoal!
Pretendo impedir a alteração de determinadas células através do evento SelectChange combinado com Change. Acontece que algumas células tem fórmulas , atribuir valores a uma variável não tem problema, não estou conseguindo atribuir a formula a variável. Poderiam de ajudar?

#
Segue uma possibilidade:

Código: Selecionar todos

 Dim varFórmula As Variant
  varFórmula = [D10].FormulaR1C1
  [D15].Value = varFórmula

Guru do Excel e Power BI

ATRIBUIR FÓRMULA A UMA CÉLULA

ATRIBUIR FÓRMULA A UMA CÉLULA

Re: ATRIBUIR FÓRMULA A UMA CÉLULA