お世話になります。
(下記の画像のとおり)スピンボタンをUP、DOWNするとマルチページのページを増減させるVBAを書いています。
一つのユーザフォームに二つのマルチページを作成し、それぞれ動かしたいです。
マルチページが一つなら、以下のコードで問題なく動作します。
Private Sub SpinButton1_SpinUp()
MultiPage1.Pages.Add
End Sub
しかし、画像の通りマルチページが一つのユーザフォームに二つあるとき、以下を実行すると、 MultiPage1について
エラーメッセージもなくExcelそのものが落ちてしまいます。
Private Sub SpinButton1_SpinUp()
MultiPage1.Pages.Add
End Sub
その際、二つ目のマルチページは以下のコードで問題なく作動しています。
Private Sub SpinButton2_Change()
MultiPage2.Pages.Add
End Sub
まっさらな新規Excelにコードを書いても、この現象が直りません。
どのようにすれば、二つのマルチページを扱うことができるようになりますでしょうか?
また、この現象の原因が知りたいです。
ご教授いただければ幸いです。
よろしくお願いいたします。
回答1件
あなたの回答
tips
プレビュー