アクセスのフォームの上にテキストボックスがあり、
書式は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(アクセス)
-
テキストボックスにクエリ結果を表示させたい
その他(データベース)
-
Access サブフォームでの選択行の取得
その他(データベース)
-
-
4
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
5
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
6
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
7
ACCESS フォームで入力した日付をクエリで読み
その他(Microsoft Office)
-
8
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
9
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
10
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
11
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
12
アクセスでエラー このフィールドに入力した値が正しくありません
その他(データベース)
-
13
Access VBAでタブコントロールで選択するタブをしていするには。
Access(アクセス)
-
14
Access テキスト型に対する指定桁での0埋め方法
その他(データベース)
-
15
ACCESSでテーブルにあるチェックボックスを一括でYesにする方法を教えてください
Access(アクセス)
-
16
accessのレポートであとから他のテーブルのフィールドを追加する方法
Access(アクセス)
-
17
ACCESSでコントロールソースの変更
Access(アクセス)
-
18
アクセスVBAのMe!と[ ]
Access(アクセス)
-
19
Accessで、定型入力を使って年と月のデータだけ入力したい
Access(アクセス)
-
20
Accessでエクセル出力の保存先指定
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
日付を差し込み印刷で表示した...
-
【Tableau Desktop】文字列から...
-
ファイルメーカーで検索結果を...
-
ACCESSの自動連番について
-
日付型のテキストボックスに数...
-
挿入した日付の自動更新を中止...
-
差し込み印刷で日付の曜日を表...
-
【Word】 今日の「年」「月」...
-
オープンオフィス のWriterで日...
-
Accessで日付から曜日を自動で...
-
クエリで日付型のIIF関数の使用
-
Wordの日付変換ってできますか?
-
VBAでエクセルシートを更新...
-
「24日の0時」って・・・
-
エクセルのチェックボックスを...
-
パソコンで購入したデーターが...
-
エクセルで最高値、最低値の日...
-
日付の大小の表現
-
回覧板の日付について質問です...
-
差し込み印刷に当日の日付が入...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
日付を差し込み印刷で表示した...
-
日付を昇順で並び替えし、空白...
-
差し込み印刷で日付の曜日を表...
-
【Word】 今日の「年」「月」...
-
日付型のテキストボックスに数...
-
Wordの日付変換ってできますか?
-
日付がインポートされない
-
クエリで日付型のIIF関数の使用
-
Wordで、ヘッダーに印刷日付を...
-
【Tableau Desktop】文字列から...
-
ACCESSの自動連番について
-
Word2010 フィールド内での和...
-
accessで残業時間計算
-
wordの日付入力の仕方について...
-
Accessで秒を時間で表示させる...
-
Accessで日付から曜日を自動で...
-
挿入した日付の自動更新を中止...
-
Firebirdで年齢算出
-
ファイルメーカーの日付の検索
-
datetime型でのソート
おすすめ情報