Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

入力規則（リストで制限する）Validation.Add メソッド

2015/09/03

ドロップダウンリストで入力値を制限

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ソース

　
Sub Sample02_Validation()

    With Range("B2").Validation
            
        '入力規則を削除
        .Delete
        
        '入力規則の設定：「Sheet2」の「A1:A5」をリストに設定
        'エラーメッセージのスタイルは「注意」
        .Add Type:=xlValidateList, _
             Formula1:="=Sheet2!A1:A5", _
             AlertStyle:=xlValidAlertWarning
                   
        
    End With

End Sub

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 オブジェクト, Validation オブジェクト, Validation.Add メソッド, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: セル範囲内を検索（Find メソッド）

Find メソッド指定したセル範囲内の特定の情報を含むセルを検索します。【書 …

: セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）

セルの値の置換と書式設定検索条件に一致するセルの書式を設定するには、まず、Ap …

: 直前のセル・直後のセルを参照する（Previous プロパティ・Next プロパティ）

Previous プロパティ・Next プロパティ Previous プロパティ …

: ２つ以上のセル範囲を１つにまとめて参照（Union メソッド）

Union メソッド Union メソッドは、２つ以上のセル範囲を１つにまとめて …

: オートフィルタ（矢印を非表示にする）AutoFilter メソッド

AutoFilter メソッド【書式】 object.AutoFilter ( …

: 文字列の横位置を取得・設定する（HorizontalAlignment プロパティ）

HorizontalAlignment プロパティ HorizontalAlig …

: アクティブなセルを参照する（ActiveCell プロパティ）

ActiveCell プロパティ ActiveCell プロパティは、各ウィンド …

: 列名を取得、列番号を取得（Address プロパティ,Column プロパティ）

列番号を取得するセル番地（「A1」や「B3」）や列名（「A」「B」「C」&#8 …

: 次の検索（FindNext メソッド,FindPrevious メソッド）

FindNext メソッド Find メソッドで開始された検索を継続します。引数 …

: セルをアクティブにする・セルを選択する（Activate, Select）

セルをアクティブにする・選択する【書式：セルをアクティブにする】 object …

PREV: 入力規則（入力時メッセージの設定）Validation オブジェクト
NEXT: 入力規則（エラーメッセージの設定）Validation オブジェクト