現在Excelをまとめているのですが、シートが50ほどになりとても検索しにくくなっています。
そこで、シートの巻頭にシートを追加し、コンボボックスを設けて、コンボボックスのリストから選択したシートへジャンプさせたいと考えました。
VBAを使うようなのですが、参考になる質問が見つからなかったので、是非ご存知の方教えて頂けないでしょうか?
※ちなみに小生、VBAに非常に疎い為コンボボックスへのリストの入力方法まで教えて頂けるとありがたいのですが・・・・
困っています!
宜しくお願い致します。
No.2ベストアンサー
- 回答日時:
一番簡単な確認の方法として,VBAの画面でユーザーフォームを作成した時点でツールバーにある「マクロの実行ボタン」(三角のやつ)を押してみてください。
VBAの画面からエクセルの画面に切り替わりマクロがきちんと動くかどうか確認できます。きちんと動かないようであればマクロの不備。
きちんと動くようであれば以下の手順が簡単だと思います。
エクセルのツールバーにVBAとフォームを表示させます。そうするとツールバーに再生マークと録画マークが表示されると思います。録画マーク●をクリック。録画マークが停止マーク■に変わるのでそれをクリック。
VBAの画面を表示。VBAプロジェクト(左上のやつ)に標準モジュールフォルダの中にModule1というやつがあるのでそのコードを表示。
コードに
Sub Macro1()
UserFome1.show
End sub
と書き込み。
エクセルの画面に戻ってツールバーの「フォームのボタン」を目次ページに挿入。右クリックで「マクロの登録」をクリック。
Macro1を選択。
これでボタンをクリックするとユーザーフォームが出現します。
べつに「ボタン」でなくてもマクロを登録できるなら図形でも何でも構いません。
この回答への補足
たびたびすいません。。。
▲マークを押して、マクロを走らせてみたのですが
結局コンボボックスにシート名が出てきませんでした。
何かおかしいと思うのですが、何がおかしいのかわかりません。
ちょっと自分でも本を買ってきて勉強したいと思います。
有難うございました。
No.1
- 回答日時:
例えばデータの入ったシートが50あったとしましょう。
51枚目のシートを作りそのシートのA1からA50まで順にSheet1からSheet50まで書き込みます。(シートの名前を変更しているならその名前)A1からA50までをドラッグで囲みます。左上のセル番号を表示しているところに範囲の名前(例えば「しーと」)をつけます。VBAを開きます。
ユーザーフォームを挿入し,コンボボックスを挿入します。コンボボックスのプロパティにRow Sourceがありますのでそこに「しーと」と入力します。
コンボボックスのコードを開いて
Private Sub ComboBox1_Change()
Sheets(ComboBox1.Text).Select
Range("A1").Select
End Sub
と入力してみてください。
この回答への補足
回答有難うございます。
早速試してみたのですが、上記通りにしてみたところ
コンボボックスがSheet51(目次ページ)に出てきませんでした。
(ExcelシートはA1~A50まで記入した状態で、何も変わりませんでした)
おそらくVBAの何かで間違った事をしているのだと思いますが、
どうしたらいいのでしょうか?
すいません。教えてください m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) コンボボックス及びリストボックスを5段階連動させる方法をご存知の方ご教授頂きたいです。 Excelで 3 2022/04/03 21:43
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Visual Basic(VBA) ExcelVBA ドロップボックスで月を選択するとそれ以降のデータが残るようにしたい。 3 2022/12/16 14:53
- Excel(エクセル) VLOOKUP が機能しない、その原因は何 ? 8 2022/10/19 12:06
- Excel(エクセル) マクロVBA別Excelブックにデータ転記 2 2022/07/10 23:35
- Visual Basic(VBA) ユーザーフォームでのリストボックス連動(VBA) 3 2022/11/28 11:41
- Excel(エクセル) EXCEL マクロで 同じフォルダ内の複数ファイルの複数行全体を選択して1つのファイルに集約 4 2022/09/27 18:41
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
- Excel(エクセル) vba 同じブック内での転記について 4 2023/01/15 14:42
- Excel(エクセル) シートが違う2枚のエクセルシートにある数値を別シートにコピーしたい(VBA?) 8 2022/03/31 12:24
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
エクセル印刷時 一枚の書類に...
-
1ヶ月分の日付を一度に出す方法...
-
エクセルの一部のセルの背景色...
-
マクロで印刷→セルの値から部数...
-
エクセルでのヘッダーをページ...
-
エクセルの行タイトルを特定の...
-
エクセルのマクロで複数シート...
-
エクセルで複数のシートの1枚目...
-
エクセルのシート名を印刷した...
-
エクセルで行番号、列アルファ...
-
EXCELで複数のシートを同時に印...
-
Excel 特定のシートを印刷不可...
-
印刷枚数をセルの数値としたい
-
カラーで一括印刷したいです
-
エクセルの複数シートをNアップ...
-
エクセルの表になってる名簿か...
-
EXCELで宛名だけ連続変更...
-
Excel 2シートを1枚に印刷した...
-
エクセルで140人をマクロを...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
エクセルの一部のセルの背景色...
-
エクセル印刷時 一枚の書類に...
-
エクセルの行タイトルを特定の...
-
エクセルでのヘッダーをページ...
-
1ヶ月分の日付を一度に出す方法...
-
マクロで印刷→セルの値から部数...
-
Excel 特定のシートを印刷不可...
-
エクセルでシートの色がグレー...
-
Excelのシート背景に不明な文字...
-
エクセルで複数のシートの1枚目...
-
エクセルで複数のシートを同じ...
-
エクセルで行番号、列アルファ...
-
エクセルのマクロで複数シート...
-
条件によって印刷するシートを...
-
なぜか「Nextに対応するForがあ...
-
カラーで一括印刷したいです
-
EXCELで複数のシートを同時に印...
-
エクセルのページ設定を他のペ...
-
エクセルのシート名を印刷した...
おすすめ情報