マクロについて

質問

マクロであるプログラムを組んでいますが、うまくいきません。
かなり簡素化していいますと、次のような状況です。
エクセルのcells（1,1)に「9：30」という文字が入っています。
この"9：30"という文字列を読み出そうとするのですが読み出した値は0.39583…という数値になってしまっています。
具体的に言うと、

sub macro1()
開始時刻="9:30"
時刻=cells(1,1)
if 開始時刻=時刻 then
a=1
endif
end

というようなプログラム（実際はもう少し複雑ですが）を組んだのですが、どうしても「a=1」にならないので、デバッグ式で見てみると「時刻」の中味は"9:30"ではなく0.39583という数値だったということです。

ちなみにエクセルのそのセルの書式は、「表示形式：時刻、種類13:30」となっています。

どうすれば"9:30"という時刻（文字列）を読み出せるのでしょうか。教えてください。よろしくお願いいたします。

回答No.1

papayuka · ベストアンサー

こんにちは。

Cells(1, 1).Text

にしましょう。

お礼

遅くなってすみません。
単純ですね…できました！
ありがとうございました。

回答No.3

imogasi

「:」を入れたがために、９：３０は時刻と解釈され、書式を
数値にすると、９．５／２４すなわち２４時間＝１日を１として9時間半は０．３９・・・であるというわけです。
日にちも数値を表示形式にすると、１９００年１月１日を１とする延べ日数になり初めは面食らいます。
／や－や：はデータ入力で、特別な意味を持っていますので、
良く勉強してください。さて文字列に敢えてするなら、「’」
を先頭につけて入力する。一旦’を付けずに入力してしまうと
表示形式を文字列にしても０．３９・・・の文字列になってしまうし、="'" & A1もダメなようです。
if 開始時刻=時刻 の左辺はプログラムで””に囲まれているので文字列になりますが右辺時刻がＣｅｌｌｓ（１，１）なので数値なんで、どんな数値が来ようが不等になります。

お礼

ありがとうございました。
そーいうことだったのですか…
勉強不足ですね。がんばります。

回答No.2

papayuka

こんにちは。

これでも良いです。

開始時刻 = TimeValue("9:30")
時刻 = Cells(1, 1)