入力規則(リストで制限する)Validation.Add メソッド
ドロップダウンリストで入力値を制限
Validation.Add メソッド(または、Validation.Modify メソッド)の 引数 Type プロパティ に 定数 xlValidateList を指定します。
object.Validation.{ Add | Modify }
( Type := xlValidateList, Formula1 := cellrange, AlertStyle := const )
引数・戻り値
- object ・・・ 対象となる Range オブジェクトを指定します。
- cellrange ・・・
【リストを直接指定】:Formula1 := “AAA,BBB,CCC,DDD,EEE” のように指定します。
【セル範囲を指定】:Formula1 := “=A1:A5” のように指定します。
【シートを含める】:Formula1 := “Sheet2!E1:E5” のように指定します。(Excel 2007 以降)
【名前付きの範囲】:Formula1 := 範囲名 のように指定します。
※ 別シートのセル範囲に「名前」を設定することで、旧バージョンの Excel でも別シートのセル範囲を指定できます。 - const ・・・ メッセージボックスのスタイルを指定します。
定数 内容 ダイアログボックス xlValidAlertStop 「停止」リストにない値は入力できません 
xlValidAlertWarning 「注意」「はい」をクリックするとリスト外の値を入力することができます 
xlValidAlertInformation 「情報」「OK」をクリックするとリスト外の値を入力することができます 
入力規則(リストで制限する) 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Sub Sample02_Validation() With Range("B2").Validation '入力規則を削除 .Delete '入力規則の設定:「Sheet2」の「A1:A5」をリストに設定 'エラーメッセージのスタイルは「注意」 .Add Type:=xlValidateList, _ Formula1:="=Sheet2!A1:A5", _ AlertStyle:=xlValidAlertWarning End With End Sub |
実行結果
実行後
リストにない値を入れた時
関連記事
-
-
セルを参照する(Range プロパティ)
Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …
-
-
指定した行数・列数移動したセル・セル範囲を参照(Offset プロパティ)
Offset プロパティ Offset プロパティは、基準となるセル・セル範囲か …
-
-
オートフィルタ(矢印を非表示にする)AutoFilter メソッド
AutoFilter メソッド 【書式】 object.AutoFilter ( …
-
-
別シートのセルを選択(Goto メソッド / PreviousSelections プロパティ)
Goto メソッド 次の例のように、1 行で、Activate メソッド や S …
-
-
罫線の設定(Borders プロパティ)
罫線の設定 罫線を一括(上下左右すべて)で設定するには、Borders プロパテ …
-
-
オートフィルタ(アイコンで抽出する)AutoFilter メソッド
オートフィルタ(アイコンで抽出する) Excel 2007 から、条件付き書式で …
-
-
アクティブなセルを参照する(ActiveCell プロパティ)
ActiveCell プロパティ ActiveCell プロパティは、各ウィンド …
-
-
行の高さを取得・設定・する(RowHeight プロパティ)
RowHeight プロパティ RowHeight プロパティは、対象セルの高さ …
-
-
引数に指定したセル範囲の共通のセル範囲を取得(Intersect メソッド)
Intersect メソッド Intersect メソッドは、引数に指定したセル …
-
-
重複するデータを削除(RemoveDuplicates メソッド)
RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …

