| |
皆さん、こんばんは。
>●方法１（めっちゃ簡単）
>
> エクセルのメイン画面をアイコン化しておく。（コードはそのまま）
>
>●方法２（コードで設定する）
>
>Sub test1()
> Application.WindowState = xlMinimized
> UserForm1.Show
>End Sub
ｂｙｋｉｎさんの方法で既に事足りていると思いますが、
VBEオブジャクトを探っていたらこんなイベントがあったので・・・。
イベントプロシジャーが記述できるモジュールに（例えば、Thisworkbookのモジュール）、
'===============================================================
Private WithEvents cme As CommandBarEvents
Sub run_cmd_event()
Dim cmc As CommandBarControl
Set cmc = Application.VBE.CommandBars("Run").Controls(1)
Set cme = Application.VBE.Events.CommandBarEvents(cmc)
End Sub
'==================================================================
Private Sub cme_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)
Application.WindowState = xlMinimized
End Sub
として下さい。
尚、参照設定で「Microsoft Visual Basic For Applications Extensbility 5.3」
にチェックして下さい。
これでプロシジャー「run_cmd_event」を実行後に
VBEからメニュー-実行-Subの実行を行ってみて下さい。
どこまで実用化できるかは？？ですが・・・。
それとこのコードを実際には、どこに置くかも考えないと・・・。
|
|
ichinose
- 03/11/19(水) 22:25 -
