Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3132 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【64000】シート上のリストとユーザーホームのコンボと同期 Uchan 10/1/9(土) 17:58 質問[未読]
【64001】Re:シート上のリストとユーザーホームのコ... n 10/1/9(土) 19:29 発言[未読]
【64003】Re:シート上のリストとユーザーホームのコ... Uchan 10/1/9(土) 20:28 発言[未読]
【64014】Re:シート上のリストとユーザーホームのコ... n 10/1/9(土) 23:02 発言[未読]
【64016】Re:シート上のリストとユーザーホームのコ... Uchan 10/1/10(日) 0:11 お礼[未読]
【64017】Re:シート上のリストとユーザーホームのコ... n 10/1/10(日) 1:21 発言[未読]
【64037】Re:シート上のリストとユーザーホームのコ... uchan1121 10/1/12(火) 9:25 お礼[未読]
【64000】シート上のリストとユーザーホームのコン...
質問  Uchan  - 10/1/9(土) 17:58 -
引用なし
パスワード
   EXCELシートの各行の入力とユーザーホームでの入力を連動したいのですが、
シート上のセルに入力規則でリストを作成（リストは名前定義で別シートにある）
この場合、ユーザーホームを開いたとき、通常のセルは、ControlSourceにセルを指定で
ＯＫですが、ドロップダウンリストで、名前定義を直接参照でなくシート上の入力セル
（リスト）を参照して制御する方法はないでしょうか？

どなたかご教示お願いします。
【64001】Re:シート上のリストとユーザーホームの...
発言  n  - 10/1/9(土) 19:29 -
引用なし
パスワード
   >ドロップダウンリストで、名前定義を直接参照でなくシート上の入力セル（リスト）を参照して制御する方法はないでしょうか？
ドロップダウンリストとは[入力規則]のリストの事？それともComboBoxのListの事？
もうちょっと具体的な言葉で補足説明お願いします。

例えば
『Sheet1のA1:A10を「xxx」と名前定義している。
　B1:B10を「yyy」と名前定義している。
　C1は[入力規則]のリストで「xxx」を設定。
　D1は[入力規則]でリストを「yyy」を設定。
　UserForm1のComboBox1のRowSourceを設定する時、「xxx」「yyy」という名前定義を直接参照するのではなく
　アクティブなセルの[入力規則]で設定されたリストを調べて、それによって設定する範囲を変更したい』
...とか。
【64003】Re:シート上のリストとユーザーホームの...
発言  Uchan  - 10/1/9(土) 20:28 -
引用なし
パスワード
   ▼n さん：
ご指摘ありがとうございます。

>ドロップダウンリストとは[入力規則]のリストの事？それともComboBoxのListの事？
ComboBoxのListのことです。

そして、▼n さんが例を書いていただいた通りの事が、まさに知りたいことです。

よろしくお願いします。
【64014】Re:シート上のリストとユーザーホームの...
発言  n  - 10/1/9(土) 23:02 -
引用なし
パスワード
   あら？...かなり推理はいってましたけどそれで良かったですか。
では多分こんな感じかと。

Private Sub CommandButton1_Click()
　　Dim x As Long
　　
　　With ActiveCell.Validation
　　　　On Error Resume Next
　　　　x = .Type
　　　　On Error GoTo 0
　　　　If x = xlValidateList Then
　　　　　　Me.ComboBox1.RowSource = .Formula1
　　　　Else
　　　　　　MsgBox "no data"
　　　　End If
　　End With
End Sub
【64016】Re:シート上のリストとユーザーホームの...
お礼  Uchan  - 10/1/10(日) 0:11 -
引用なし
パスワード
   ▼n さん：
参照元のセルをアクティブにしないとダメなんですね。
希望通りにできました。
ありがとうございました。
【64017】Re:シート上のリストとユーザーホームの...
発言  n  - 10/1/10(日) 1:21 -
引用なし
パスワード
   >参照元のセルをアクティブにしないとダメなんですね。
いや別にそんな事はないですけど。
With Range("A1").Validation
:
参照元がA1セルだったらこうなります。
参照元をどうやって指定するか、です。
【64037】Re:シート上のリストとユーザーホームの...
お礼  uchan1121  - 10/1/12(火) 9:25 -
引用なし
パスワード
   ▼n さん：
重ね重ねありがとうございました。


>>参照元のセルをアクティブにしないとダメなんですね。
>いや別にそんな事はないですけど。
>With Range("A1").Validation
>:
>参照元がA1セルだったらこうなります。
>参照元をどうやって指定するか、です。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3132 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free