1

ワークブックが開かれたとき、またはワークブックがアクティブになったとき (バックグラウンドで実行されているが、ユーザーが別のワークブックまたは別のアプリケーションで作業しているときはアクティブではないことを意味します) にマクロを作成したいと思います。カスタマイズされた警告メッセージ。理想的には、コードは次のようになり、ThisWorkbook オブジェクト コードに含まれます。

Sub warningmsg()

Dim wb As Workbook
Set wb as This.Workbook
If wb.first.mouseclick <> True 
Then
    MsgBox "Warning, this workbook is HOT"
end sub

Excel VBAでこれはどのように可能ですか?

4

1 に答える 1

1

以下のコードをコードに貼り付けThisWorkbookます

Private Sub Workbook_Activate()
    MsgBox "this workbook is hot"
End Sub

ファイルを保存して閉じます (マクロを含む拡張子 ( .xlsm など) を使用してください)。

もう一度開き、別のブックを開きます。ウィンドウを切り替えて、上記のコードが含まれているウィンドウをアクティブにすると、MsgBox が表示され、this workbook is hot文字列が表示されます

于 2013-09-06T07:59:52.993 に答える