Excel VBA ユーザフォームを閉じさせない
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If isRunning And CloseMode = vbFormControlMenu Then
If MsgBox("処理中です。本当に終了しますか？", vbQuestion Or vbYesNo) <> vbYes Then
Cancel = 1
End If
End If
End Sub
指定されたパートは存在しません。
YAGI Hiroto (piroto@a-net.email.ne.jp)
twitter http://twitter.com/pppiroto
Copyright© 矢木 浩人 All Rights Reserved.