Excel VBA質問箱 IV

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

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


59754 / 76738 ←次へ | 前へ→

【21659】Re:条件付リストのような物は作成できますか?
質問  まつ  - 05/1/26(水) 8:48 -

引用なし
パスワード
   ▼ぴかる さん:
>まつさん、こんにちは。
>
>1列にすれば、こんなんでいけると思います。各リストを空きエリア(AA1〜)に1列リンク(計4列)させてみました。どうですぅ?
>
>Private Sub Worksheet_Change(ByVal Target As Range)
>
>  If Target.Address(0, 0) = "A1" Then
>    With Range("B1").Validation
>      .Delete
>      If Target.Value = 1 Then
>        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
>        xlBetween, Formula1:="=$AA$1:$AA$20"
>      ElseIf Target.Value = 2 Then
>        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
>        xlBetween, Formula1:="=$AB$1:$AB$20"
>      ElseIf Target.Value = 3 Then
>        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
>        xlBetween, Formula1:="=$AC$1:$AC$20"
>      ElseIf Target.Value = 4 Then
>        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
>        xlBetween, Formula1:="=$AD$1:$AD$20"
>      End If
>    End With
>  End If
>  
>End Sub
>
>
▼ぴかる さん:おはようございます。
早速の解凍ありがとうございます。
初心者なので教えてください。
B1セルをクリックしたときにリストをプルダウン等で表示し、
選択することができますか?

0 hits

【21635】条件付リストのような物は作成できますか? まつ 05/1/25(火) 16:31 質問
【21647】Re:条件付リストのような物は作成できます... ぴかる 05/1/25(火) 18:14 回答
【21659】Re:条件付リストのような物は作成できます... まつ 05/1/26(水) 8:48 質問
【21661】Re:条件付リストのような物は作成できます... ぴかる 05/1/26(水) 9:14 回答
【21651】Re:条件付リストのような物は作成できます... kobasan 05/1/25(火) 19:38 発言
【21660】Re:条件付リストのような物は作成できます... まつ 05/1/26(水) 8:51 質問
【21664】Re:条件付リストのような物は作成できます... Jaka 05/1/26(水) 9:50 回答
【22330】Re:条件付リストのような物は作成できます... まつ 05/2/16(水) 14:06 お礼
【21683】Re:条件付リストのような物は作成できます... kobasan 05/1/26(水) 18:07 回答
【22331】Re:条件付リストのような物は作成できます... まつ 05/2/16(水) 14:08 お礼
【21700】Re:条件付リストのような物は作成できます... ぴかる 05/1/27(木) 14:53 発言
【22329】Re:条件付リストのような物は作成できます... まつ 05/2/16(水) 14:05 お礼

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