ユーザーフォームの表示ついて

Question

###前提・実現したいこと
Excelを最小化しても、ユーザーフォームを表示させたい。

＜詳細＞
ユーザーフォームを vbModeless で表示しています。
Excelを最小化すると、ユーザーフォームも最小化されてしまいます。
Excelを表示すると、ユーザーフォームも表示されます。
これを、Excelを最小化してもユーザーフォームを表示したいのですが、
どうすれば宜しいでしょうか？

Excelは2010です。

宜しくお願いします。

Answer 1

userFormを呼び出す前にエクセルを最小化し、最小化したエクセルをアクティブにした後にuserFormを呼び出せばいいと思います。

Sub userFormTest()
Application.WindowState = xlMinimized
AppActivate "Microsoft Excel"
UserForm1.Show
End Sub

フォームを表示中に最小化したいということならこれでできるかなと。
Private Sub CommandButton1_Click()
Application.WindowState = xlMinimized
Me.Show vbModeless
End Sub

Comments

[echang]

回答をありがとうございます。
私の質問の仕方が悪かったみたいです。

私がやりたい事：ユーザーフォームを常に表示しておきたい

引き続き　宜しくお願いします。

[hanaane]

どのタイミングでエクセルを最小化したいのですか？
もし、ブックのオープン時からエクセルを常に最小化しておきたいということでしたら、ブックのオープンイベントでユーザーフォームを表示させて、ユーザーフォームのイニシャルイベントでウィンドウの最小化とフォームの再表示をすればできると思いますよ。

Private Sub Workbook_Open()
UserForm1.Show vbModeless
End Sub

Private Sub UserForm_Initialize()
Application.WindowState = xlMinimized
Me.Show vbModeless
End Sub