vbaコードを使用してExcelワークシートから読み取った日付データを保存するにはどうすればよいですか？

Question

私は、時間データ（HH：mm：ss）の形式でExcelワークシートに保存されたデータを持っています。しかし、グラフからデータを読み込んで情報を保存しようとすると、値が正しく保存されず、10進数の文字列が与えられます。

sub generic() 
dim s as string 
s = Range("A1").Value 'A1 is where the value is stored. In this case it is 7:30:30. 
MsgBox s 
end sub 

出力は小数です（0.623 ..私は信じています）。出力をセルA1の情報（文字列7:30:30）にしたいだけです。私はワークシートのプロパティに影響を与えることもできません.VBAコードですべてを実行する必要があります。

Answer 1

あなたは

Dim s As Dateへ

Dim s As String

行を変更する必要があります。

これで動作するはずです。

Answer 2

あなたがDim s as Stringを維持したい場合は、以下のコードを使用することができます：あなたが以下だ答えに

s = Format(Range("A1").Value, "HH:MM:SS") 
MsgBox s