Помогите с Excel 9.0 Object Library и Oficce 97

Dim MyExcel As Excel.Application
Set MyExcel = New Excel.Application
' ... и т.д.

Dim MyExcel As Object
Set MyExcel = CreateObject('Excel.Application')
' ... и т.д.

Private Sub Command1_Click()
Dim objExcel As Object
Dim ret As String, inp As String
Dim dt As String
 
'******Здесь без 'References '  как посоветовал Comanche!!!!
'----------------------------------
 
Set objExcel = CreateObject('Excel.Application')
objExcel.Workbooks.Add ('D:MSMDataBaseCadReportFile')
objExcel.Visible = True
Set objExcel = Nothing
End Sub
 
Private Sub Command2_Click()
Dim ret As String, inp As String
Dim objExcel As Excel.Application
Dim dt As String
'******Здесь использую 'References ' !!!!
'----------------------------------------
 
Set objExcel = New Excel.Application
objExcel.Workbooks.Add ('D:MSMDataBaseCadReportFile')
objExcel.Visible = True
Set objExcel = Nothing
 
End Sub