درخواست کمک از متخصصین vb 6.5:

من توی یک ماکرو اکسس 2007 یک کد نوشتم برای باز کردن یک فایل اکسل و بعد ش سیو کردن اون . اما ارور میده .از دوستان کسی می تونه کمک کنه . کد برنامه اینه:

Dim Excelsheet As Object
Set Excelsheet = CreateObject("Excel.sheet
Set Excelsheet = Excel.workbooks.Open("g:\excel\a.xlsx
Excelsheet.SaveAs "g:\excel\a.xlsx
Excelsheet.Application.Quit
Set Excelsheet = Nothing
End Sub

خوب ارور رو هم اگه می گفتی بد نبود به نظرم

دوست عزیز سلام
از توجه شما متشکرم
ارور 424 منبی بر object requrided در خط سوم