Hint:
       Пример того, как из Visual Basic'a через OLE запустить Excel,
       и создать рабочую книгу...

””””” Cut Begin ”””””

Option Explicit

'
' CreateXlBook
' Вызывает MS Excel, создает рабочую книгу с именем sWbName с одним
' единственным рабочим листом. Рабочая книга будет сохранена в каталоге
' sDirName. В случае успеха возвращает True, в противном случае - False.
'
Public Function CreateXlBook(sWbName As String, sDirName) As Boolean

  ' MS Excel hidden instance
  Dim objXLApp As Object
  Dim objWbNewBook As Object

  CreateXlBook = False

  Set objXLApp = CreateObject("Excel.Application")
  If objXLApp Is Nothing Then Exit Function

  ' В новой рабочей книге создавать только один рабочий лист
  objXLApp.SheetsInNewWorkbook = 1

  Set objWbNewBook = objXLApp.Workbooks.Add
  If objWbNewBook Is Nothing Then Exit Function

  ' Сохраняем книгу
  If vbNullString = Dir(sDirName, vbDirectory) Then Exit Function

  objWbNewBook.SaveAs (sDirName + "\" + sWbName + ".xls")
  CreateXlBook = True

  ' Освобождение памяти
  Set objWbNewBook = Nothing
  objXLApp.Quit
  Set objXLApp = Nothing
  CreateXlBook = True

End Function

”””””” Cut End ””””””

Hint2:
      Tested and approved with MS Visual Basic 4.0ee

   С уважением,
                Andrew Kirienko.