- ベストアンサー
エクセルＶＢＡのマルチページについて
こんばんわ！ エクセルＶＢＡのマルチページでpage1、page2、page3とあり、ページを変えたら実行させたいと思うのですが、可能でしょうか？ 可能なようでしたら参考ページもしくはサンプルソースをお願いいたします。 アドバイスの程よろしくお願いいたします。
- osarusan0214
- お礼率66% (210/316)
- その他MS Office製品
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
以下の様にすれば実行できます。 Private Sub MultiPage1_Change() MsgBox MultiPage1.Value + 1 & "番目のタブです" End Sub
関連するQ&A
- エクセルＶＢＡのマルチページについて
こんばんわ！ エクセルＶＢＡのマルチページでpage1、page2、page3とあり、page2に変えたら実行させたいと思うのですが、可能でしょうか？（page1やpage3にしても実行せず、page2にすると実行したい。） 可能なようでしたら参考ページもしくはサンプルソースをお願いいたします。 アドバイスの程よろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
- エクセルVBAでマルチページの切り替え方法の件で
エクセルVBAを使用して フォームを作成しているのですが マルチページを利用してpage1上にコマンドボタンを 配置しそのボタンをクリックすることでpage2に切り替わる 仕組みを作りたいと思っているのですが なかなかうまくいきません Private Sub CommandButton102_Click() userform1.page2.Show End Sub ↑のように考えてはみたのですが エクセルに間違ってるといわれてしまいました ご存知の方がいらっしゃいましたらよろしくお願いします
- 締切済み
- オフィス系ソフト
- Excel VBA のマルチページ
使用環境：Excel2007 VBAのユーザーフォームにMultiPageを配置し各ページにScrollbarを 設定（Vertical)したいと思っています。 各ページに配置まではできましたが、実行しても動かず困っています。 写真やコマンドボタンを多く配置するので、マルチページで対応できたら と考えています。 ヒントとなるコードまたはURLが解れば教えて頂きたいです。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- マルチページのタブを切り替えたとき・・
エクセル2002使用です。 ＶＢＡで、ユーザーフォーム1、ユーザーフォーム2の2つのフォームを作り、ユーザーフォーム１内にマルチページ（page1、page2）をつくりました。マルチページのpage1からpage2にタブを切り替えた時に、ユーザーフォーム2を表示させたいのですが、うまくいきません。 UserForm1のモジュールに記述しています。 Private Sub MultiPage2_Change() Load UserForm2 With UserForm2 .StartUpPosition = 0 .Top = 50 .Left = 20 .Show End With End Sub 原因がわからず困ってます。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- VBAについて
Excel VBAのUserFormにマルチページ（Page1、Page2、Page3）があります。 Sheet1で１行目のセルを選択した場合は、UserFormのPage1のみを表示 （Page2、Page3は非表示）、 Sheet１で２行目のセルを選択した場合は、UserFormのPage2のみを表示 （Page1、Page3は非表示）、 というようにしたいのですがうまくできません。 どのようにしたらよいのでしょうか。
- ベストアンサー
- Visual Basic
- マルチページで現在開いているページの確認
Excelユーザーフォームにマルチページを貼り付けて ページを５枚作成しました。 (Pag1,PAge2,Page3,Page4,Page5) ページにはそれぞれボタンが貼り付けてあります。 ボタンを押すとfunctionが起動します。 ここでfunctuinのなかで今Pageの1,2,3,4,5のどれを選択しているか確認したいのですが どのようなロジックになりますか？
- ベストアンサー
- Visual Basic
- エクセル2003 ユーザーフォーム、マルチページのページ選択の記述
いつもこちらで勉強させていただいております。 エクセルVBAでユーザーフォームを作成しました。 フォームにはマルチページが有り、ページ数は3枚あります。 で、質問なのですが、フォームを読み込んだときに ページを必ず1ページを表示するようにしたいのですが コードの書き方が判りません。 フォーム作成でページ１を選択しておけば、1ページ目が 表に来るのですが、コードで処理しておけないかなと 思いましてご質問させていただきました。 フォームオブジェクト名：UesrForm1 ページオブジェクト名：Page1 となっております
- ベストアンサー
- オフィス系ソフト
- VBAでマルチページの表示
エクセル2002使用です。 ユーザーフォーム（オブジェクト名：UserForm1）に、マルチページ（オブジェクト名：page１）を配置してフォームを作成しました。 Sheet１にコマンドボタンを貼り付け、コマンドボタンをクリックして、標準モジュールを呼び出し、マルチページを標準モジュールから呼び出せるようにしたいのですがうまくいきません。 ’Sheet１ Private Sub CommandButton1_Click() Call フォーム表示 End Sub ’標準モジュール Sub フォーム表示() UserForm1.Show ’？ここのコードをいろいろ試したのですがわかりません。 End Sub この他 UserForm1.ShowPages "page1" とか 変数を入れてみたりしたのですが、うまくいきません。 すいませんが、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルVBA/マルチページ/ページ切り替え時
エクセル2000使用 ユーザーフォーム（UserForm1）：マルチページ（MultiPage１）でページを５つ 作成。各ページにはテキストボックスとコマンドボタンを配置。 テキストボックスに値入力後、コマンドボタンをクリックするとテキストボック スの値をクリアするように設定。 テキストボックスに値入力後、コマンド実行前にページを替えた時、テキストボ ックスの値をクリアしたいのですが、どのようにすればよろしいのでしょうか。 類似する過去の質問を見てもよくわからなかったので、ぜひご回答のほどよろし くお願い申上げます。
- ベストアンサー
- オフィス系ソフト
- エクセルVBA マルチページのSetFocus
いつもお世話になっております。 ありがとうございます。 マルチページ内のエラー時に、テキストにフォーカスしたいのですが、 該当のエラーテキストではないページ（タブ）にカーソルがあった場合、 エラーとなってしまいます。 色々調べて、やってみたのですが、うまくいきません。 ご教授いただけると幸いです。 マルチページ内には、いくつかのテキストとチェックボックスがあります。 マルチページのページ数はmei_su = 5 です。 For i = 1 To mei_su Set mychk = Me.Controls("chkMei5_" & i) If mychk.Value = True Then MsgBox "チェックされていますが、入力されていません。" Set mytxt = Me.Controls("txtMei2_" & i) mytxt.SetFocus Exit Sub End If Next MultiPage1.value = 0 とか、 Me.Controls("Page" & i).enable = true とかも 入れてみたのですが、ダメでした。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
お礼
MultiPage1_Changeでいけるんですね！ ありがとうございます！！