これからの季節に親子でハイキング! >>

あるシステムからデータを抜き出し、アクセスやエクセルにて二次加工
利用しています。システム側では、以下のように時刻欄を(便宜的に)
日付として利用しています。

時刻欄に入力されている 6:01:27 (2006年01月17日の意味)

これを数値表示させた場合以下の通りであり、当然、時刻として扱われ
てしまいます。

2006/01/27  (38744)
6:01:27 (0.2510069)

やむなく 6:01:27 のまま日付表示を意味するとして印字しているので
すが、このままでは日数計算など数式に取り込むことができません。

6:01:27 を計算式にて日付データへ変換することは可能でしょうか?
識者の方、ご経験者の方アドバイスいただけましたら幸いです。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

これは?


Sub aaa()

Dim strDate As String

strDate = "6:01:27"
strDate = Replace(strDate, ":", "/")

Debug.Print DateValue(strDate) '2006/1/27

End Sub
    • good
    • 0
この回答へのお礼

早速の回答有難うございました。
明日、実際に試して見たいと思います。まずはお礼まで。

お礼日時:2006/01/29 11:41

下記でもできると思います。


Sub Test01()
Dim strDate As String
strDate = "6:01:27"
t = Split(strDate, ":")
MsgBox DateSerial(t(0), t(1), t(2))
End Sub
    • good
    • 0
この回答へのお礼

回答ありがとうございました。
ANo.1の方の方法と併せて試して見ます。
有難うございました。

お礼日時:2006/01/29 11:44

データが A1 として =DATEVALUE(TEXT(A1,"hh/mm/ss")) で下記の期間なら対応出来ると思いますが、、、



0:01:27 ~ 23:01:27 → 2000/1/27 ~ 2023/01/27
    • good
    • 0
この回答へのお礼

こちらはエクセルでの解決策ですね。
あわせて活用したいと思います。有難うございました。

お礼日時:2006/01/29 11:42

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング