- ベストアンサー
エクセルでドロップダウンリスト
tksoftの回答
- tksoft
- ベストアンサー率36% (99/273)
とりあえず、こんなのはどうでしょう 1.A列にリストにしたい文字があるのですが、途中空白が沢山あるので、それを詰めてリストにしたいです。 セルを詰めちゃってもいいのであれば次のようなコードはどうでしょう(全角スペースでインデントしてあります)。 Sub Assort() Dim i As Integer, j As Integer 'とりあえず30行ほどチェックする Const Line As Integer = 30 i = 1 Do While i < Line If Worksheets("Sheet1").Cells(i, 1) = "" Then '最初の空白を見つけた j = i For i = j To Line If Not Worksheets("sheet1").Cells(i, 1) = "" Then Worksheets("sheet1").Cells(j, 1) = Worksheets("sheet1").Cells(i, 1) j = j + 1 Worksheets("sheet1").Cells(i, 1) = Null End If Next End If i = i + 1 Loop 'コンボボックスにリストの範囲を設定 UserForm1.ComboBox1.RowSource = "A1:A" & j - 1 'フォームの表示 UserForm1.Show End Sub で、 2.リストから選んだらその選んだ値のセルへ自動的に画面をジャンプするようにしたいです。 はComboBoxのChangeイベントに次のコードを書けばおろしいかと。 Private Sub ComboBox1_Change() Worksheets("Sheet1").Cells(Me.ComboBox1.ListIndex, 1).Select End Sub
関連するQ&A
- ドロップダウンリスト
お聞きしたいことがあります。 リストを作成し、入力規則からドロップダウンリストで 項目を選択する表を作成しました。 しかし、A列の幅が狭く、ドロップダウンリストで表示されるリストの文字が最初の3文字ぐらいなのです。 列の幅分しか、リストの表示スペースがないのです。 A列の幅に関係なく、もう少し表示されるリストの幅というか文字を増やすには、どうしたらいいでしょうか。 列の幅を広げたり、隣のセルを結合することは、表のレイアウト上できません。 ちなみに、別のエクセルの表では、それができているのですが、それをどうやったかわかりません・・・。 どなたかわかる方、教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルでドロップダウンリストを…
エクセルでドロップダウンリストを使用する場合の質問です。 あるセルに入力した文字列によって、ドロップダウンリストで選択できる範囲を限定するような設定は可能でしょうか。 例) セルA1に「花」と入力したら セルA2にドロップダウンリストで セルE1~E4の「ひまわり、バラ、すみれ、チューリップ」を 選択できるようにし、 セルA1に「野菜」と入力したら、 セルA2にドロップダウンリストで セルE5~E8の「トマト、なす、きゅうり、にんじん」を 選択できるようにする。 初歩的質問ですみませんが、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのドロップダウンリスト
入力規則のドロップダウンリストですが、次のような使い方は可能でしょうか?また可能なら方法を教えて頂けませんか?よろしくお願いします。 A、B列にドロップダウンリストを設定し、A列のリストに値を複数設定し、B列のリストの値をA列の値によって変化させたいのですが・・・。各列とも、複数行にわたってドロップダウンリストを設定しています。
- ベストアンサー
- オフィス系ソフト
- エクセルのドロップダウンリスト
エクセルのドロップダウンリストについて、困っていることがあります。 たとえば、 ・Aシート A列|B列|C列 1|ペン|200 2|鉛筆|100 3|本|200 ・Bシート A列|B列 ペン(ドロップダウンリスト)|200 という風に、Bシートのドロップダウンリストを選択すると、動的に200と隣のセル(B列)に表示するようにするにはどのようにすればいいでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルVBAについて質問です。
エクセルVBAについて質問です。 シート1のユーザーフォームにコンボボックスとテキストボックスが各1つずつ、 シート2のA列には1行目から順に「あ」「い」「う」と文字が入っていて、B列には「1」「2」「3」と値が入っています。 コンボボックスのリストにはシート2のA列の文字が選択できる状態にあります。 この状態で、例えばコンボボックスで「い」を選んだら、テキストボックスに自動的に「2」と入る、というように、コンボボックスのリストの中から任意の文字を選択したときに、テキストボックスにB列の値が入るようにするにはどのようにすればいいのでしょうか?よろしくお願いします。
- ベストアンサー
- Visual Basic
- エクセルVBA「コンボボックスの値をワークシートに代入」
エクセルVBA「コンボボックスの値をワークシートに代入」 連日質問してしまい申し訳ありません。・・・ 今回は「コンボボックス」にリストアップされている値をセルに入力したいのです。 画像を見て頂ければと思いますが、コンボボックス(左ウィンドウ画像)には25の文字列がリストアップされています。 このリストアップされている文字列をすべてワークシートのセルB4からの"4"列に入力したいのです。 なんだか滅茶苦茶ですが、ご理解頂ければご協力お願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのドロップダウンリスト
こんにちは。エクセルで入力規則からドロップダウンリストを作成するときの質問です。リストの元の値を名前定義で指示しているのですが、リスト内容を後から追加できるように名前定義の範囲を現在値が入力されている範囲を超えて空白セルもいくつか一緒に定義しています。 このとき、ドロップダウンリストには当然名前で定義されたリストが出るのですが、空白も一緒に出てきます。 質問は、この空白を無視(値が入力されている範囲だけ)してリスト表示できないかということです。あるいは、空白がリストに含まれてでるのですがその際にリストが一番上でなく真ん中あたりが最初に表示され、つまりリストの▼を押した段階で空白リスト、その後スライドバーでリスト上部を表示させて選択する形になっているのですが、いきなり最上部のリストが表示される方法でも構いません。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルのドロップダウンリストを自動で出すには?
エクセル(2007 OLD STYLE)のドロップダウンリストを設定してますが、セルのところで▼をクリックするのではなく そのセルに来たら自動でリストを表示させるようにしたいのですが、そのためのVBAはどのように するのでしょうか?宜しくお願いします。
- ベストアンサー
- その他MS Office製品
- Excel97でのドロップダウンリストについて
セルにドロップダウンリスト(入力規則)を設定したエクセルファイルがあります。このファイルを開けると、セルによってドロップダウンリストが出現するセルと出現しないセルが発生します。 出現するセルと出現しないセルは、いつも同じセルです。なぜリストが出現しないセルがあるのか分かりません。 状況1.WIN98SEにOFFICE97を入れています。 状況2.ファイルが開くときにマクロで書式設定等を行っています。 状況3.マクロを無効にして開くと、全てのリストは出現します。 状況4.OFFICE2000の環境では、正常に全てのリストは出現します。 状況5.そのファイルは何度か手を加えられており、97の環境で作られたか 2000の環境で作られたか分かりません。おそらくもともと97で 作られ、その後2000で手を加えられたと思います。 リストが出現しないというのは、そのセルをクリックしても、ドロップダウンの矢印?が出ず、リストも表示されないというものです。リストの一覧は他のセルに設定してあります。ただ、入力規則は働いており、そのセルには、リストの一覧にある文字しか入力はできません。 どなたか助けてください。お願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル リストボックスをボタンで選択するマクロ。
VBA初心者なので教えていただけるとありがたいです。 現在、sheet1にリストボックスを貼り付けています。 そのリストボックスで選択した値を、sheet2のA1セルに貼り付けるようなマクロを作ってみました。 リストボックスのリストは、下のような感じになっています。 空白 ああああ いいいい うううう これとは別にボタンを作成し、ボタンを押すとこのリストボックスの空白(一番上のリスト)を選択するようにしたいのですが、このようなことはできるのでしょうか? なぜこのようなことがしたいのかは、説明が長くなりそうなので省略させていただきます。 どなたか教えていただけるとありがたいです。
- ベストアンサー
- オフィス系ソフト
お礼
回答ありがとうございます。 え~ちょっと説明が悪かったですね(^^; 次のような表を作成しております。 A ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ B ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ ○ C ○ ○ ○ ○ ○ ○ ○ ○ ・ ・ ・ と、数百くらい続いてます。 それで、たとえばGを見たいっていうときに、毎回スクロールするのが大変なので、コンボボックスを使ってABC・・とリストをつくり、その指定したセルへ自動的にジャンプするようにしたいのです。 普通にコンボボックスをたとえばA3からA500と範囲指定で作成しても、途中の空欄部分もリストに表示されてしまうので困ってます、どうしたらよいのでしょうか。 すみませんが、よろしくお願い致します。