Access 日付データのテーブル上での不具合
Access 日付データのテーブル上での不具合
OS:Windows10
Access:2013 ⇒ Office365
お世話になっております。
現在クライアントのデータベースをクリーニングしております。
日付型フィールド(フィールド名:日付)に見た目上日付が入っているのですが、
連結フォーム上に表示するとデータによって不具合が生じます。
例)
テーブル格納データ:2019/11/05
フォーム上のテキストデータ:令01年11月(フォーム上は和暦年月表示)
同じテキストボックス(表形式)なのに、クリックした時の反応がデータによって違います。
あるデータは「2019/11/05」に戻るのに対して不具合があるデータは「令01年11月」のままです。
テーブルで直修正をするとそのデータはクリック時に「2019/11/05」に戻ります。
見た目上は同じでも格納データは型が違うようです。
いちいち不具合のあるデータを探して手で修正するわけにもいかないで、検索して見つけた情報を基に
コード等で変換をしているのですが、改善されません。
<試したこと>
(1)更新クエリ format関数による変換(Format([日付],"yyyy/mm/dd"))
(2)コードで変換
Dim h_date As String
Dim h_date_true As Date
If Not IsNull([日付]) Then
h_date = Left([日付], 4) & Mid$([日付], 6, 2) & Right([日付], 2)
h_date_true = DateSerial(Left(h_date, 4), Mid(h_date, 5, 2), Right(h_date, 2))
h_date_true = CDate(Format(h_date_true, "@@@@\/@@\/@@"))
End If
レコードセット![西暦] = h_date_true
この連結フォーム上で修正フィールドのデータを更新する仕様です。
クエリやレコードセット等でデータをそろえるために何か良い方法はございますでしょうか。