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にセルを指定で
OKですが、ドロップダウンリストで、名前定義を直接参照でなくシート上の入力セル
(リスト)を参照して制御する方法はないでしょうか?

どなたかご教示お願いします。

【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