解決済みの質問
Excel2007 VBA リストボックス
Excel2007 VBA リストボックス
Excel VBA 初心者です。
ユーザーフォームのリストボックスを使って、複数あるSheetの中から
一つ選択し、コマンドボタンで決定すると、そのSheetが選ばれる。
というようにしたいのですが、どうしたらいいでしょう？
なるべく詳しく教えてください。
お願いします。
- 補足
- 説明不足ですみません。
セルにはSheetの名前は入っていませんし、入れることも印刷のレイアウト上できません。
Sheetタブ（初期画面ならSheet1、Sheet2と入っているところ）にしか名前は入力されておらず、
リストボックスにSheetタブの名前を表示させたいんです。
たびたびすみません、お願いします。
-
- 質問日時：
- 2010/6/24 08:17:20
-
- 解決日時：
- 2010/6/24 10:04:42
-
- 回答数：
- 1
-
- お礼：
- 知恵コイン
- 50枚
-
- 閲覧数：
- 277
-
- ソーシャルブックマークへ投稿：
- Yahoo!ブックマークへ投稿
- はてなブックマークへ投稿
- （ソーシャルブックマークとは）
ベストアンサーに選ばれた回答
補足に関して
A1:A3である必要はありません。XFD列の最終行付近でもかまいません。リストボックスに表示するデータはシートのセルからもってくるしかなかったと思います。
例えば、Sheet1のA1:A3にシート名を入れている場合、
Listbox1を右クリックし、プロパティを選択し、RowSourceへSheet1!A1:A3といれます。
CommandBox1を右クリックし、コードの表示を選択し、次のようにします。
Private Sub CommandButton1_Click()
Worksheets(ListBox1.Value).Select
End Sub
お確かめ下さい。
- 違反報告
- 編集日時：2010/6/24 09:09:57
- 回答日時：2010/6/24 08:47:00
- この質問・回答は役に立ちましたか？
- 役に立った！
お役立ち度：
1人が役に立つと評価しています。
あなたにおすすめの解決済みの質問
- Excel VBAでコマンドボタンを作成 すいません、質問があります。 Excel VBAで、 あるブックのsheet1にコマンドボタンを配置し、 そのボタンが押されたら、違うブックのsheet2に 新たに"ボタン２"というコマンドボタン...
- EXCEL VBAの「ＩＦ」についての質問です。 EXCEL VBAについての質問です。 ３択の問題を作り、各コマンドボタンを押すと、正解、不正解のフォームを出したいのですが、うまくいきません。色々調べたのですが、何が間違っている...
- ExcelのVBAで、テキストボックスに入力できるデータを制限したいのです。 私は、ユーザーフォーム内のテキストボックスに、文字データのみを入れられるようにしたいと思っております。 どうかよろしくお願いします。
質問した人からのコメント
また、VBAに関する質問すると思いますが、見かけたら
よろしくお願いします。