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

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

2015/09/03

入力規則の入力時メッセージを表示する

Validation.ShowInput プロパティ を True に設定すると、入力規則が設定されているセルをアクティブにした時、入力時メッセージを表示することができます。

【書式】

object.ShowInput = boolean

引数・戻り値

object ・・・対象となる Validation オブジェクトを指定します。
boolean ・・・入力時メッセージをブール型（Boolean）の値（True ：表示、False：非表示）で、指定します。

入力規則の入力時メッセージのタイトルを設定する

Validation.InputTitle プロパティ で、入力時メッセージのタイトルを設定することができます。

【書式】

object.InputTitle = string

引数・戻り値

object ・・・対象となる Validation オブジェクトを指定します。
string ・・・入力時メッセージのタイトルを文字列型（String）の値で、指定します。

入力規則の入力時メッセージを設定する

Validation.InputMessage プロパティ で、入力時メッセージを設定することができます。

【書式】

object.InputMessage = string

引数・戻り値

object ・・・対象となる Validation オブジェクトを指定します。
string ・・・入力時メッセージを文字列型（String）の値で、指定します。

入力規則（入力時メッセージ）使用例

サンプルVBAソース

　
Sub Sample03_Validation()

    With Range("B2").Validation
            
        '入力規則を削除
        .Delete
        
        '入力規則の設定
        'エラーメッセージのスタイルは「停止」
        .Add Type:=xlValidateDate, _
             Formula1:="2015/1/1", _
             Operator:=xlLessEqual, _
             AlertStyle:=xlValidAlertStop
                   
        .InputTitle = "日付入力"
        .InputMessage = "今日より前の日付を入力してください！"
        .ShowInput = True
        
    End With

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

　

Sub Sample03_Validation()

With Range("B2").Validation

'入力規則を削除

.Delete

'入力規則の設定

'エラーメッセージのスタイルは「停止」

.Add Type:=xlValidateDate, _

Formula1:="2015/1/1", _

Operator:=xlLessEqual, _

AlertStyle:=xlValidAlertStop

.InputTitle = "日付入力"

.InputMessage = "今日より前の日付を入力してください！"

.ShowInput = True

End With

End Sub

　

実行結果

- セルの操作 Range オブジェクト, Validation オブジェクト, Validation.InputMessage プロパティ, Validation.InputTitle プロパティ, Validation.ShowInput プロパティ, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

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

関連記事

: セルが選択されているか確認する（TypeName 関数）

セルが選択されているか確認する方法と使用例 TypeName 関数の引数に、Se …

: 対象のセルが直接参照しているセル全てを取得（DirectPrecedents プロパティ）

DirectPrecedents プロパティ DirectPrecedents …

: セルを参照する（Range プロパティ）

Range プロパティ任意のセルにアクセスするには Range プロパティを使 …

: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）

Formula プロパティ（FormulaR1C1 プロパティ） Formula …

: セルの値を置換（Replace メソッド）

Replace メソッド任意のセル範囲内から特定の値を一括して置換します。Fi …

: セルの特定の要素のみをペーストする（PasteSpecial メソッド）

PasteSpecial メソッド PasteSpecial メソッドは、Cop …

: 文字列を縮小して全体を表示（ShrinkToFit プロパティ）

ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …

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

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

: 対象のセルを直接参照しているセル全てを取得（DirectDependents プロパティ）

DirectDependents プロパティ DirectDependents …

: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）

HasArray プロパティ HasArray プロパティは、対象のセルが配列数 …

PREV: 入力規則（Validation オブジェクト）
NEXT: 入力規則（リストで制限する）Validation.Add メソッド