• ベストアンサー

Excelのコンボボックス選択方法

VB初心者です。宜しく御願いします。 ExcelのコンボボックスをVBから選択したいのですが、上手くいきません。 AAAというコンボボックスで中身が「111」「222」「333」の場合、 objXlsSeet.Range("AAA").Select = "222" としたのですが、実行時エラー'1004' アプリケーション定義またはオブジェクト定義のエラーです。 となります。 ご教授御願いします。宜しくお願い致します。

質問者が選んだベストアンサー

  • ベストアンサー
  • redfox63
  • ベストアンサー率71% (1325/1856)
回答No.1

コンボボックスの選択されたデータを『222』にしたいのでしょうか? そうならば AAA.SelText = "222" でよさそうに思います 設定したデータが登録された項目にあるかどうかは ListIndexが-1以外なのかをチェックしましょう

Mark0817
質問者

お礼

ありがとうございます。 redfox63のおかげで、解決しました。

関連するQ&A

  • EXCEL コンボボックスを使ってツリー状に選択

      ABC 1 あ       左のようなセルを使ってツリー状にした表から 2  AAA    別シートにコンボボックスを横に3つ作成して 3  BBB    ”あ”を選択したら隣のボックスに”AAA” 4   111   と”BBB”の選択肢が現れ、”BBB”を選 5   222   択したらその隣のボックスに”111”と”222” 6 い       の選択肢が現れる といったことが出来ないでしょ 7  aaa    うか? 8   333    9  bbb    説明がやっかいだと思いますので、「こんな本で見た」           という覚えがある方がいらっしゃいましたら是非教えて           下さい。お願いします。

  • Excelで、コンボボックスで選択したとき特定のマクロを動かす

    1つのシートにコンボボックス(フォームコントロール)を2つ並べてあります。  コンボボックス”ドロップ1”   コンボボックス”ドロップ2”  【選択肢】             【選択肢】  ・1回                ・A  ・2回                ・B  ・3回 とあります。それぞれのコンボボックスの選択肢は、別のシートに名前を定義して表示するようにしてあります。 その際、上の例だとマクロを6種類用意してあります。  (1) 1回A  (2) 1回B  (3) 2回A  (4) 2回B  (5) 3回A  (6) 4回B とあり、1つ目のコンボボックスで「2回」を、2つ目のコンボボックスで「B」を選んだ場合、 (4)のマクロを実行するようにするにはどのようにしたらよいでしょうか? ※ コンボボックスは両方選ばない限りはマクロを実行させません。 また、両方既に選択してあり、そのマクロが一度実行させた後、一方だけ変更しても他のマクロを実行させたいです。 また、本件とは別の内容となっていまいますが、コンボボックスなどが”フォームコントロール”と”ActiveX コントロール”と2種類あるのですが、どのように違うのでしょうか? ちなみにExcelは2007です。ご教授よろしくお願いします。

  • 列を数値で選択する方法をご教授ください

    エクセル2007です。 Columns("a:b").Select なら列を選択できますが、 Columns(1 & ":" & 2).Select だと 「実行時エラー1004、アプリケーション定義またはオブジェクト定義のエラーです」 になってしまいます。 数値にしたい理由は、変数を代入したいからです。 アドバイスよろしくお願いします。

  • コンボボックスの値を参照する

    こちらVBA初心者です。宜しくお願い致します。 A:Aを"出身地"、 B:Bを"データ"という名前で定義しており、 D1~D3を"選択"という名前で定義しています。 入力内容はこうです。 D1・・・空白 D2・・・出身地 D3・・・データ そしてA列とB列の最初にある空白セルを見つける為に、 Range("出身地").Select Selection.End(xlDown).Offset(1, 0).Select もしくは、 Range("データ").Select Selection.End(xlDown).Offset(1, 0).Select で可能だと言う事がわかりました。 そして、それをユーザーフォームでコンボボックス内のRowSouceに選択と入力して、 コンボボックスでどちらかを選び、ボタンを押して実行。と、したいのですがここから先がうまくいきません。 VBAに関するサイトは多く、様々な場所で勉強させていただきましたがどうにも理解出来ませんでした。 どうか、お助け下さい。

  • コンボボックスの選択肢にエクセルの列を呼び出す

    質問させてください。 私はExcel2002、VB6.0を使用しています。 やりたいことは、 1、エクセルのA列内で記入されているセルをすべて検出 2、1で検出した文字をコンボボックスの選択肢に代入 以上となります。 基本的な操作かもしれませんが、いろいろ調べてみたのですがどうも見つからなくて困っています。 よろしくお願いします。

  • コンボボックス選択後に非アクティブに

    vb.netに関して教えてください。 コンボボックスの値を変更すると変更した文字の選択状態になるのですが、 これを非アクティブの状態にする方法を教えてください。 アプリケーション自体を非アクティブでもかまいません。 TextChangedイベントに書くことはわかるのですが、その先に何を入力していいのか見つけられませんでした。 よろしくお願いします。 それと、終了時のイベントは Mybase.Closingだと思うのですが、”Closing”がForm1イベントの ドロップダウンリストにでてきません。 なにか原因があるのでしょうか?

  • C# コンボボックスについて

    コンボボックスが2つあって 2つとも中身があります。 コンボボックス1の中身 りんご みかん なし コンボボックス2の中身 10001 10002 10003 やりたいことは、コンボボックス1にみかんを選択したら自動的にコンボボックス2に10002と表示したいのですが、どうしたらできますか? どなたか教えて頂けませんか?お願いいたします。

  • Excelマクロのコンボボックスについて

    初めてマクロを扱います。 マクロに詳しい方、コードをご教授ください。 Excelマクロを使い下記の機能をシートに盛り込みたいと考えております。 【実現したいこと】 ・シート上にコンボボックスを作成し、コンボボックスで選択した項目で絞り込めるようにする。 ・コンボボックスに格納される項目は、A列の重複を除外し、昇順で並べ替えたもの。 ・またコンボボックスに格納する項目は日々レコード追加されるため、コンボボックスの中身にも随時反映するようにしたい。 ・コンボボックスには「全て表示」というアイテムを追加し、「全て表示」を選択すると、フィルターが解除される。 わかりにくいかもしれませんが上記のことを実現したいと考えております。 どうかお知恵をお貸しください!! よろしくお願いします!!

  • VBA コンボボックス

    VBAコンボボックスで AAAを選択→処理A BBBを選択→処理B CCCを選択→処理C としている場合、 AAAを選択→処理Aの後、コンボボックスで再度AAAをクリックしても次の処理Aにいきません。いったんBBBをクリックしてしてAAAをクリックすると処理Aに行きますが、連続AAAをクリックして処理Aはできないでしょうか。 何か方法はありませんか? Private Sub ComboBox1_Change() If ComboBox1.Value = "AAA" Then   ’処理Aへ ElseIf ComboBox1.Value = "BBB" Then   ’処理Bへ Else   ’処理Cへ End If End Sub

  • VBAコンボボックスのリスト選択について

    現在、ユーザーフォームを作成していますがコンボボックスでのリスト選択について質問します。 【質問内容】 コンボボックスを3つ作成し、Select Caseでそれぞれのリストを連動させるプログラムを組んでいます。 (1)3つとも選択した後で例えばリスト1を変更しようとするとエラーになってしまいます。リスト以外の文字列も入力できるようにしているつもりですがなぜでしょうか? (2)選択後、シートセルに転送した後、テキストボックスならば「.Text = ""」で一旦空白になりますが、コンボボックスの場合どうしたらよいのでしょうか? シートセルに転送後も選択した内容が残ってしまい結局(1)の事象に基づきエラーになってしまい連続入力ができません。 初歩的な質問で恐縮ですが、よろしくお願いいたします。

専門家に質問してみよう