Access VBAで地域設定に依存しない日付書式の設定を行いたい。

Question

Access VBAでOS側の地域設定に依存せず、指定した日付を取り扱うことはできませんか？

例えば、C#でCultureInfo.CurrentCultureに設定するのと同様の設定を行いたいです。

今回の場合、yyyy/mm/ddで表示や取得(Now()など)を行いたいが、
一部地域設定が(mm/dd/yy)で設定されているため、不具合が生じる場面があります。

よろしくお願いいたします。

Answer 1

地域の設定はofficeを含めた標準形式の共通的な表示書式を設定するものですから、それを設定に関わらず、固定にするなら個々の書式を明示的に設定するしか無いと思います。

C#でCultureInfo.CurrentCulture

前提が.Netでのスレッド上の話ですから、Accessで代替えするようなものは見たことは無いですね。

Comments

[m0804]

ご回答ありがとうございます。

やはり個別に修正するしかないようですね。
そのようにしようと思います。ありがとうございました。

Answer 2

どのような場面での話でしょうか。

テーブル、フォーム、レポートなどでの表示上の話なら、書式プロパティで yyyy/mm/dd と設定しておけばいいですね。

VBAで Now() とか Date() を使う場合は、日付/時刻型(Date)の変数に代入しておけば、問題ないです。

問題があるとしたら、VBAでSQLを扱うとき、SQL文字列に変換するときに、地域設定の影響を受けますので、Format関数で書式を設定して変換すればいいでしょう。

Dim stSQL As String
stSQL = "SELECT * FROM table1 WHERE 日付=#" & Format(Date(),"yyyy/mm/dd") & "#;"

Comments

[m0804]

回答ありがとうございます。
ご指摘の通り、SQLの扱いで主に問題があったため、全体の見直しを行っていたところでした。

やはりそういった修正しかありませんよね...。
個別に修正しようと思います。ありがとうございました。

[hatena19]

未確認ですが、ファイル→オプションの「クライアントの設定」に「4桁で年表示」という項目がありますが、そこの「このデータベース」「すべてのデータベース」にチェックを入れたら、Formatなしでもいけるかもしれません。