Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9277 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【28207】リストボックスの扱いについて 福岡人 05/8/31(水) 6:21 質問[未読]
【28219】Re:リストボックスの扱いについて kobasan 05/8/31(水) 14:01 発言[未読]
【28352】Re:リストボックスの扱いについて 福岡人 05/9/3(土) 7:59 お礼[未読]
【28207】リストボックスの扱いについて
質問  福岡人 E-MAIL  - 05/8/31(水) 6:21 -
引用なし
パスワード
   指定した範囲のアクティブセルにリストボックスから入力させたいのですが、上手く行きません教えていただけないでしょうか。
　if activecell=range("b7:b17") then
　　 activecell=listbox1.listindex
　end if
としましたが範囲を認識しません。
Ｂ７からＢ１７までの範囲でアクティブセルにマウスがあるところでリストボックスが表示されるようにするにはどうしたらよいでしょうか。よろしくお願いします。
【28219】Re:リストボックスの扱いについて
発言  kobasan  - 05/8/31(水) 14:01 -
引用なし
パスワード
   ▼福岡人 さん今日は。

これ、たぶん入力規則のことだと思います。
このことなら、標準メニューの
データ／入力規則／入力地の種類でリストを選択／元の値でデータ範囲を指定
でできます。

この設定をb7:b17の範囲にコピー貼り付けすればできるのでは

違っていたらごめんなさい。

userformを表示するのなら、その旨を書くと良いと思います。


>指定した範囲のアクティブセルにリストボックスから入力させたいのですが、上手く行きません教えていただけないでしょうか。
>　if activecell=range("b7:b17") then
>　　 activecell=listbox1.listindex
>　end if
>としましたが範囲を認識しません。
>Ｂ７からＢ１７までの範囲でアクティブセルにマウスがあるところでリストボックスが表示されるようにするにはどうしたらよいでしょうか。よろしくお願いします。
【28352】Re:リストボックスの扱いについて
お礼  福岡人 E-MAIL  - 05/9/3(土) 7:59 -
引用なし
パスワード
   ▼kobasan さん：
ありがとうございました。お礼が遅れて申し訳ありませんでした。本当にありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9277 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free