エクセルのVBAで数値を時刻の値へ変換するには？

質問

VBAは初心者です。宜しくお願いします。
シート1のＡ1に840、Ｂ1に1730と単なる数字の値が入っております。
ＶＢＡを実行すると
シート2のＡ1に8:40、Ｂ2に17:30と時刻の値として取り扱えるように
表示させるには、どうすればよろしのでしょうか？

回答No.2

merlionXX · ベストアンサー

A1はA1
B1はB2にですか？
いったん文字列形式で00:00の形にしてからセットすればエクセルは時間と判断してくれます。

Sub test01()
Dim a As String, b As String
a = Format(Sheets("Sheet1").Range("A1").Value, "00:00")
b = Format(Sheets("Sheet1").Range("B1").Value, "00:00")
Sheets("Sheet2").Range("A1").Value = a
Sheets("Sheet2").Range("B2").Value = b
End Sub

お礼

merlionXXさん
シート1のB1をシート2のB1でした（汗
ですが、ご返答頂いた内容で十分ご理解できました！！
文字列形式できちんと認識してくれるんですね！
ご丁寧にありがとうございましたｍ(＿＿)ｍ

回答No.1

marbin

VBAヘルプで
TimeSerial 関数
を調べてみてください。

お礼

marbinさん
TimeSerial関数というのをもう少し勉強させて頂きます。
ありがとうございました。