OLE Registration error

I am having the OLE Registration error. I have read that I have to
close Ole. Can any one tell me  how to do it?


My Code:

Private Sub Command1_Click()

    Dim myChart As Object
    Set myChart = Forms![Form1]![Graph1]
    myChart.Ex****t filename:="C:\Chart.gif", Filtername:="GIF"
    Set myChart = Nothing
    Set myChart.Action = acOLEClose  ' ??? not working Error code 91
in this line

End Sub

My Reffs:
  VB for application
  M Access Object Library 10.0
  MS Graph 10.0
  MS Forms 2.0