Inserir grafico em form (erro)

[LGcs]

Pessoal tudo bom? to querendo inserir aqui um grafico de uma determinada planilha em um form usando o objeto Image. Procurei muito já o q pode ser o erro mas eu não encontro, estranho é que na minha casa funciona aqui no trabalho não. aparece o seguinte erro Erro de tempo de execução.

To mechendo com o excel..

alguém pode me ajudar? ai vai o meu codigo

valeu

Private Sub CommandButton1_Click()
'Transfere para a variável Gráfico o 1º gráfico da planilha 'Exemplo"

Set gráfico = Sheets("Consolidação").ChartObjects(1).Chart

'Cria o caminho e nome para salvamento do arquivo GIF

ArquivoGIF = ThisWorkbook.Path & "\temp.gif"

'Salva o gráfico como arquivo GIF

gráfico.Export Filename:=Arquivogif, FilterName:="GIF"

'Carrega o gráfico salvo para o Controle Image1 do Userform

Image1.Picture = LoadPicture(Arquivogif)
End Sub

Editado Julho 25, 2010 por kuroi
Adicionar tag CODE

[kuroi]

qual erro em q linha??

[LGcs]

qual erro em q linha??

Aparece uma msg dizendo: erro de tempo de execução.

to mechen do com o VB dentro do excel

[kuroi]

Aparece uma msg dizendo: erro de tempo de execução.

isso não tem importancia, o q preciso saber é o resto da mensagem do erro e em qual linha do codigo ele acontece.

[LGcs]

Aparece uma msg dizendo: erro de tempo de execução.

isso não tem importancia, o q preciso saber é o resto da mensagem do erro e em qual linha do codigo ele acontece.

Erro em tempo de execução '1004':

Erro de definição de aplicativo ou de definição de objeto

Ele não me da o numero da linha q esta dando o erro, e nem deixa em destaque.

Agradeço a sua atençao.