Put this in your ThisWorkbook object.
Code
-------------------
Private Sub Workbook_Open()
Application.Visible = True
UserForm1.Show
End Sub
-------------------
Let me know how it goes, if it doesn't work - show me the code you wer
using so i can get a better idead what you want
--
Message posted from
http://www.ExcelForum.com