特定のセルで日付形式のみを許可するにはどうすればよいですか？

セルのリストを制限して、Excelワークシートに日付形式の入力のみを許可するにはどうすればよいですか？ この記事では、この仕事に対処するためのいくつかの興味深いトリックについて説明します。

データ検証機能を使用して、特定のセルで日付形式のみを許可する

VBAコードを含む特定のセルで日付形式のみを許可する

データ検証機能を使用して、特定のセルで日付形式のみを許可する

Excelでは、 データ検証 は、ドロップダウンリストの作成、重複エントリの防止などに役立つ強力な機能です。また、特定のセルに日付形式のみを入力する他のデータ形式の入力を防止するのにも役立ちます。 次の手順で実行してください。

1に設定します。 OK をクリックします。 且つ > データ検証 > データ検証、スクリーンショットを参照してください：

2。 の中に データ検証 ダイアログボックスで、をクリックします。 設定 タブをクリックし、 カスタム 次を許可します。 ドロップダウンリストから、次の式を入力します。 = AND（ISNUMBER（B2）、LEFT（CELL（ "format"、B2）、1）= "D"） に 式 テキストボックス、スクリーンショットを参照：

Note：上記の式では、 B2 データ形式を制限する列の最初のセルです。

3. 次にクリックします エラーアラート ダイアログボックスのタブで、次の操作を実行してください。

（1.）チェック 無効なデータが入力された後にエラーアラートを表示する オプション;

（2.） 形式 ドロップダウン、選択してください Force Stop オプション;

（3.）を入力します 役職 • エラーメッセージ プロンプトボックスに表示したいもの。

4。 設定が終わったら、 OK ボタンをクリックすると、実際の日付形式ではないデータを入力すると、次のスクリーンショットのようにプロンプ​​トボックスが表示されます。

VBAコードを含む特定のセルで日付形式のみを許可する

XNUMX番目の方法では、VBAコードを紹介します。

1。 使用するワークシートをアクティブにします。

2。 次に、シートタブを右クリックして、 コードを表示 コンテキストメニューから、スクリーンショットを参照してください。

3。 表示された アプリケーション向け Microsoft Visual Basic ウィンドウで、以下のコードをコピーして、 モジュール、スクリーンショットを参照してください：

VBAコード：特定のセルに入力する日付形式のみを許可します。

Private Sub Worksheet_Change(ByVal Target As Range)
'updateby Extendoffice
Set w = ActiveSheet.Range("B2:B12")
For Each c In w
If c.Value <> "" And Not IsDate(c) Then
c.ClearContents
MsgBox "Only a date format is permitted in this cell."
End If
Next c
End Sub

4。 次に、コードを閉じて広告を保存します。B2：B12の範囲で日付形式ではない値を入力すると、プロンプトボックスが表示され、同時にセルの値がクリアされます。スクリーンショットを参照してください。