Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


12291 / 13646 ツリー ←次へ | 前へ→

【11306】コンボボックスの選択欄の取得 evian 04/3/5(金) 9:38 質問
【11309】Re:コンボボックスの選択欄の取得 IROC 04/3/5(金) 9:55 回答
【11311】Re:コンボボックスの選択欄の取得 evian 04/3/5(金) 10:13 質問
【11310】Re:コンボボックスの選択欄の取得 Jカーター 04/3/5(金) 10:07 回答
【11312】Re:コンボボックスの選択欄の取得 evian 04/3/5(金) 10:25 お礼

【11306】コンボボックスの選択欄の取得
質問  evian  - 04/3/5(金) 9:38 -

引用なし
パスワード
   ActiveXコントロールのコンボではなく、
フォームコントロールのコンボボックスについて教えてください。

選択されている項目を取得したいのですが、どうしたらよいのでしょうか?
リンクセルを設定すればIndexは取得できますが、項目自体を取得したいのです。
どなたかご教授ください。
宜しくお願いします。(Win2000, Excel2000)

【11309】Re:コンボボックスの選択欄の取得
回答  IROC  - 04/3/5(金) 9:55 -

引用なし
パスワード
   Indexから参照先のセルを判断して
文字を取得できませんか?

【11310】Re:コンボボックスの選択欄の取得
回答  Jカーター  - 04/3/5(金) 10:07 -

引用なし
パスワード
   こんにちは。
選択時に取得するなら
以下のマクロを登録しておけば取得できます。
---------------------------------------------------------------
Sub ドロップ1_Change()
  With ActiveSheet.DropDowns(Application.Caller)
    MsgBox .List(.ListIndex)
  End With
End Sub

別のアクションで取得したいなら
Application.Callerの部分を
対象ドロップダウンのオブジェクト名に変更して下さい。

【11311】Re:コンボボックスの選択欄の取得
質問  evian  - 04/3/5(金) 10:13 -

引用なし
パスワード
   ▼IROC さん:
>Indexから参照先のセルを判断して
>文字を取得できませんか?

回答ありがとうございます。
上記の方法は考えていたのですが、
コントロール上に表示してるんだから、
そのまま取得できないのかなぁと思ったので、ご質問させていただきました。

コントロールを選択しても、
テキストの編集ができない時のシェイプ選択と同じ状態だから、
やはり無理なんですかねぇ

【11312】Re:コンボボックスの選択欄の取得
お礼  evian  - 04/3/5(金) 10:25 -

引用なし
パスワード
   ▼Jカーター さん:

おぉ〜 うまくいきました!
まさに私がやりたかったことそのものです!
ありがとうございます。
さすがですね!またよろしくお願いします。

12291 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free