VARIAVEIS EM VBA

DENIS.GOULART 05/12/2006 14:28:23
#188086
Dim teste As Integer

Private Sub CommandButton1_Click()

teste = Range("A1").FormulaR1C1 * 2
MsgBox teste

End Sub


Sendo que o Valor que esta em A1 é 10,50

o erro que da é ERRO EM TEMPO DE EXECUÇÃO 13
TIPOS INCOMPATIVEIS...

O que devo fazer para poder fazer este calculo...

Grato
LUIS.FLAVIO 05/12/2006 14:42:19
#188097
Resposta escolhida
Dim teste
teste = Plan1.Range("A1").Value * 2
MsgBox teste
DENIS.GOULART 05/12/2006 14:53:31
#188101
Luis Flavio... Estou muito grato... era este erro mesmo...

Grato
Tópico encerrado , respostas não são mais permitidas