Excel VBA TIME関数の質問です。

Excel VBA のTIME 関数について質問です。

Sub jikan()
　Dim TM As Date '①

　TM = Time

　Range("A1") = TM
　MsgBox TM
End Sub

このように書いて実行したら

A1には　7:31:11 PM
と表示され、

MegBoxは 19：31：11
と表示されました。

つまりセルには12時間表示
MsgBox は24時間表示です。

セルを変えても変わりません。
NumberFormatLocal とかは全く使っていません。

Excelはデフォルトでこういう状態なのでしょうか。
OS（WINDOWS）自体は24時間で設定しています。
ご覧の方も試していただき、状況を教えていただけないでしょうか。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2021/10/08 21:07

こんばんは

セルの表示は「書式設定」を変えることで、表示形式の変更ができます。
多分、出荷時のデフォルトシートの設定がご質問のようになっているものと想像します。

ブック作成時のデフォルトのテンプレートは、ユーザが設定可能になっていますので、そちらをお好みに合わせた設定にしておけば良いのではないでしょうか？
https://ja.extendoffice.com/documents/excel/2403 …

この回答へのお礼

ありがとうございました。設定ができるのは知りませんでした。早速やってみます。

お礼日時：2021/10/08 21:39

No.2 回答者： mygoonickname 回答日時： 2021/10/08 21:21

こんばんは。

同じ様な結果になりました。

マクロからセルに書き込むと、12h表記がデフォルトになるという
　ことなのかも知れませんね。

＞セルを変えても変わりません。
　→　最初に表示形式を24h表記に変えて、マクロを実行すると、
　Msgboxと同じ表記になりました。

この回答へのお礼

ありがとうございました。同じということで、納得できました。

お礼日時：2021/10/08 21:37