Option Explicit
Dim oExcel As Excel.Application

Private Sub Form_Load()
  Set oExcel = New Excel.Application
  ...
End Sub

Private Sub Form_Unload()
  Set oExcel = Nothing
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de