アクセスのフォームの上にテキストボックスがあり、
書式はyyyy/mm/dd(aaa)になっています。
日付型の値を入力した際は問題ないのですが
例えば、20130720と入力したら、
このフィールドに入力した値が正しくありません。
例えば、数値型のフィールドに文字列を入力しました。
となります。
なので、
Private Sub 日付_BeforeUpdate(Cancel As Integer)
If Len(Me.ActiveControl.Value) = 8 Then
Me.ActiveControl.Value = Format(Me.ActiveControl.Value, "yyyy/mm/dd")
End If
End Sub
としてみたのですが、
更新前処理イベントが発動する前に、
「このフィールドに入力した値が正しくありません。
例えば、数値型のフィールドに文字列を入力しました。」
のエラーが出てしまうようです。
20130720の形の日付を入れても自動で日付型に変換するの方法はありますか?
No.1ベストアンサー
- 回答日時:
>更新前処理イベントが発動する前に、
このAccess君のチェックをかい潜るすべは知りません。
コントロールのデータタブ→定型入力に、0000/00/00;0;_
書式が自動的に変わってしまうので再度、yyyy/mm/dd(aaa)
にもどす。
で近いことは出来ます。
参考になりそうなところ
http://hatenachips.blog34.fc2.com/blog-entry-304 …
もしくは、更新前処理ではなく変更時イベントで
Private Sub 日付_Change()
If Len(Me.ActiveControl.Text) = 8 And IsDate(Format(Me.ActiveControl.Text, "0000/00/00")) Then
Me.ActiveControl.Value = CDate(Format(Me.ActiveControl.Text, "0000/00/00"))
End If
End Sub
とかでも?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
- Visual Basic(VBA) VBAで日付入力しているのですが 4 2023/03/02 11:25
- Visual Basic(VBA) VBAのトグルボタンでのマクロについて質問です 3 2022/10/10 17:23
- Visual Basic(VBA) 【再投稿】VBAで動作しなくて困っています 2 2022/10/11 11:05
- Visual Basic(VBA) 【再々投稿】VBAのプログラムで動作しなくて困っています 8 2022/10/14 09:06
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/05/23 16:28
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) VBA。複数のChangeイベントをまとめる方法 2 2022/03/31 12:03
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/01/23 11:02
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
accessのレポートであとから他のテーブルのフィールドを追加する方法
Access(アクセス)
-
-
4
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
5
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
6
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
7
「#エラー」の回避
Access(アクセス)
-
8
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
9
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
10
「年」と「月」だけの日付の表示方法
Excel(エクセル)
-
11
アクセスでエラー このフィールドに入力した値が正しくありません
その他(データベース)
-
12
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
13
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
14
Access_Formのデザインビュー画面を拡大表示
Access(アクセス)
-
15
Access サブフォームでの選択行の取得
その他(データベース)
-
16
Access テキスト型に対する指定桁での0埋め方法
その他(データベース)
-
17
Accessクエリ 複数フィールドを対象に空白の場合は全件表示したい
Access(アクセス)
-
18
ACCESS クエリで重複データを最新の1件だけ表示
Access(アクセス)
-
19
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
20
[Access]帳票フォームにて連続する非連結コントロールに個々の値を入れるには
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
差し込み印刷で日付の曜日を表...
-
クエリで日付型のIIF関数の使用
-
Wordで、ヘッダーに印刷日付を...
-
日付を差し込み印刷で表示した...
-
日付を昇順で並び替えし、空白...
-
Accessで秒を時間で表示させる...
-
ファイルメーカーの日付の検索
-
ACCESS サブレポート パラメー...
-
【Tableau Desktop】文字列から...
-
ファイルメーカーの自動計算に...
-
EXCELからACCESSへのインポート...
-
datetime型でのソート
-
Word2010 フィールド内での和...
-
VBAでエクセルシートを更新...
-
「時間」、「期日」、「日付」...
-
「24日の0時」って・・・
-
エクセルのチェックボックスを...
-
差し込み印刷に当日の日付が入...
-
excelで、セル内に文字が入力さ...
-
エクセルで最高値、最低値の日...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
日付を差し込み印刷で表示した...
-
日付を昇順で並び替えし、空白...
-
差し込み印刷で日付の曜日を表...
-
Word2010 フィールド内での和...
-
クエリで日付型のIIF関数の使用
-
Wordで、ヘッダーに印刷日付を...
-
Accessで秒を時間で表示させる...
-
日付型のテキストボックスに数...
-
ファイルメーカーの日付の検索
-
【Word】 今日の「年」「月」...
-
Wordの日付変換ってできますか?
-
accessで残業時間計算
-
メインサブフォームでメインの...
-
【Tableau Desktop】文字列から...
-
日付がインポートされない
-
アクセス:エクセルからのイン...
-
重複を除外したカウント方法を...
-
「Access2000」今ある和...
-
ACCESSの自動連番について
-
挿入した日付の自動更新を中止...
おすすめ情報