Option Explicit
 
Private objExcel As Excel.Application
Private wbexcel As Workbook
--------------------------------------------------------------
Private Sub Command1_Click()
 
Dim seite As Excel.Worksheet
 
Set objExcel = New Excel.Application
Set wbexcel = New Excel.Workbook
Set seite = New Excel.Worksheet
 
objExcel.Caption = "test"
objExcel.Visible = True
Excel.Application.Visible = True
 
objExcel.Workbooks.Add (wbexcel)

Computer?
Ist das wieder so ein neumodischer Mist?