ブックアクティブ

Excel VBAでブックが別のブックからアクティブになった時に操作する記録です。

下図は、Excel2016です。

< スポンサーリンク >





自分のブックがアクティブになった時に「ブック名がアクティブになりました」とメッセージで表示してみます。

VBEを開き、ThisWorkbookを選択します。

ブックアクティブ

 

VBEでオブジェクト欄の「(General)」と表示してあるプルダウンの部分を「Workbook」を選択し、プロシージャ欄を「Activate」を選択します。

ブックアクティブ

 

「Private Sub Workboook_Open()・・・End Sub」の部分は必要ないので削除します。

ブックアクティブ

 

ブックがアクティブになったときに、「アクティブになりました」のメッセージが表示されるよう書き込みます。

Private Sub Workbook_Activate()
    MsgBox Me.Name & “がアクティブになりました”
End Sub

ブックアクティブ

 

別のブックからアクティブになったときにメッセージが表示されました。

ブックアクティブ

 

< スポンサーリンク >