Guru do Excel e Power BI

Este código está dentro de um loop, que deve copiar dados de uma planilha e passar para outra. Se eu fizesse sem o pasteSpecial ele funciona, porém copia a fórmula e não o valor, que é o que eu quero. Então quando eu adiciono o paste special ele mostra o erro:

Não é possível obter a propriedade paste special da classe Range.

Alguém pode me ajudar???

Código:
Workbooks("ANDROIDGTM.xlsx").Sheets("Plan1").Cells(10, 10).Copy Destination:=Workbooks("verificarGTM.xlsm").Sheets("Plan1").Cells(10, 10).PasteSpecial(xlPasteValues)

Boa tarde.
Segue minha contribuição.
Declare uma variável para carregar o valor à ser copiado.
Ficaria +- assim:

Código: Selecionar todos

Sub copia_valor()
Dim x As Variant
x = Workbooks("ANDROIDGTM.xlsx").Worksheets("plan1").Cells(10, 10)
Workbooks("verificarGTM.xlsm").Worksheets("plan1").Cells(10, 10) = x

End Sub

Guru do Excel e Power BI

Não é possível obter a propriedade paste special da classe..

Não é possível obter a propriedade paste special da classe..

Re: Não é possível obter a propriedade paste special da clas