Visual Basic para Aplicaciones - Minimizar excel

Hola:

Tengo en mi macro un UserForm y necesito que al momento de abrirla se minimize la ventana de excel y solo me muestre el User form. Haber si me puden ayudar con eso.

Saludos desde Chihuahua, Mexico

'By JuanC Dic-05

Option Explicit
Option Private Module

Public Const SW_SHOWMINIMIZED = 2

Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal szClass As String, ByVal szTitle As String) As Integer
Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

Sub Minimizar_Excel()
Dim hWnd#
On Error Resume Next
hWnd = FindWindow(vbNullString, Application.Caption)
if hWnd Then ShowWindow (hWnd, SW_SHOWMINIMIZED)
End Sub

'--------------------------------------------------------

Private Sub UserForm_Initialize()
Minimizar_Excel
End Sub

'--------------------------------------------------------

Saludos y buena suerte, desde Buenos Aires, JuanC

Hola, también puedes poner invisible el libro para que se vea solo el formulario. Puedes utilizar :

Application.Visible = False