入力規則(リストで制限する)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 |
実行結果
実行後
リストにない値を入れた時
関連記事
-
-
対象のセルを直接参照しているセル全てを取得(DirectDependents プロパティ)
DirectDependents プロパティ DirectDependents …
-
-
ワイルドカードを使って検索(Find メソッド)
Find メソッド 指定したセル範囲内の特定の情報を含むセルを検索します。 【書 …
-
-
セルを挿入する(Insert メソッド)
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
対象のセルが参照している全てのセルを取得(Precedents プロパティ)
Precedents プロパティ Precedents プロパティは、対象のセル …
-
-
指定した行数・列数移動したセル・セル範囲を参照(Offset プロパティ)
Offset プロパティ Offset プロパティは、基準となるセル・セル範囲か …
-
-
ハイパーリンク(Hyperlink オブジェクトのメソッド)
Hyperlink オブジェクトのメソッド Hyperlinks コレクション …
-
-
行・列の表示・非表示(Hidden プロパティ)
Hidden プロパティ Hidden プロパティに True を設定することで …
-
-
対象のセルが直接参照しているセル全てを取得(DirectPrecedents プロパティ)
DirectPrecedents プロパティ DirectPrecedents …
-
-
外枠罫線の設定(BorderAround メソッド)
外枠罫線の設定 罫線の設定には、Borders プロパティを使用しますが、範囲内 …
-
-
セルが結合セルの一部である場合、その結合セルの範囲を取得(MergeArea プロパティ)
MergeArea プロパティ MergeArea プロパティは、指定したセルが …

