経過時間が計算できません。

質問

エクセルのマクロで困っています。

エクセルファイルを閉じる際に、
Cells(1, 1).Value = Now()
としてファイルを閉じた時間の記録としています。

次にファイルを開いた時に前回利用時からの
経過時間を表示しようと考えています。
例：「前回利用時から、85 時間経過しています」
1時間未満は切り捨てて時間単位で表したいです。

そこで
Cells(2, 1).Value = Now() - Cells(1, 1).Value
とすると
「1900/1/4 1:00:24」となってしまいます。
表示形式を[h]と指定すれば、「97」と表示され、
一応経過時間を時間単位で表示してくれます。

ただ、この「97」という数字を他の変数に渡すには
どのようにしたらよいのでしょう？

回答No.1

web2525 · ベストアンサー

時間計算なら、シリアル値なのでそのまま利用可能。
97の数値がほしいのであれば24倍すればよい。

回答No.2

hige_082

sub お試し()
dim a as integer
a=cells(2,1).text
msgbox a
a=cells(2,1).value
msgbox a
end sub

詳細はヘルプを見てね