「内容をすべて理解する必要はない。それぞれ、関数を定義しているだけ」
'強制的に最前面にさせる
Private Declare Function SetForegroundWindow Lib
"user32" ( _
ByVal hWnd As
Long) As Long
'最小化されているか調べる
Private Declare Function IsIconic Lib
"user32" (ByVal hWnd As Long) As Long
'元のサイズに戻す
Private Declare Function ShowWindowAsync Lib
"user32" (ByVal hWnd As Long, _
ByVal nCmdShow As
Long) As Long