メッセージボックスを前面に表示させるには？自身のアプリケーションにフォーカスを持ってくる という方法ですが、２種類、３通りの方法があります。 (1)自身のVisibleを切り替える Application.Visible = False Application.Visible = True MsgBox "前面表示させたいお！" (2)APIを使う方法 (A)WindowsAPIを定義する方法 Declare Function SetForegroundWindow Lib "USER32" _ (ByVal Hwnd As Long) As Long Sub 教えて() SetForegroundWindow Application.Hwnd MsgBox "前面表示させたいお！" End Sub (B)ExecuteExcel4Macroを使う方法 ExecuteExcel4Macro "CALL(""USER32""," _
