Option Explicit
 
Private Sub Command1_Click()
 
Dim ex As Object
 
Set ex = CreateObject("Excel.Application")
 
ex.workbooks.Add
 
Me.SetFocus
 
MsgBox "Hallo, Excel ist gestartet!"
 
ex.Visible = True
 
End Sub

EALA FREYA FRESENA