Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


8210 / 13646 ツリー ←次へ | 前へ→

【34603】型の変換 VBAビギナー 06/2/8(水) 0:26 質問[未読]
【34604】Re:型の変換 かみちゃん 06/2/8(水) 0:39 発言[未読]
【34610】Re:型の変換 VBAビギナー 06/2/8(水) 9:51 お礼[未読]

【34603】型の変換
質問  VBAビギナー  - 06/2/8(水) 0:26 -

引用なし
パスワード
   date型でa=0:20:00やb=1:00:00としたものを
aは20、bは70と数字だけに変換するにはどのような関数をつかったらよろしいで
しょうか?

【34604】Re:型の変換
発言  かみちゃん  - 06/2/8(水) 0:39 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>date型でa=0:20:00やb=1:00:00としたものを
>aは20、bは70と数字だけに変換

b=1:00:00 のとき 70 という値に変換したいということがよくわかりませんが、
Minute関数、Hour関数などをヘルプで調べてみてください。

Sub Test()
 Dim a As Date
 Dim b As Date
 
 a = "0:20:00"
 b = "1:00:00"
 MsgBox Minute(a)
 MsgBox Hour(b) * 60 + Minute(b)
End Sub

【34610】Re:型の変換
お礼  VBAビギナー  - 06/2/8(水) 9:51 -

引用なし
パスワード
   ごめんなさい。間違えました。1:00のときは60でかまちゃんさんの方法で
問題ありません。
ありがとうございました。


▼かみちゃん さん:
>こんにちは。かみちゃん です。
>
>>date型でa=0:20:00やb=1:00:00としたものを
>>aは20、bは70と数字だけに変換
>
>b=1:00:00 のとき 70 という値に変換したいということがよくわかりませんが、
>Minute関数、Hour関数などをヘルプで調べてみてください。
>
>Sub Test()
> Dim a As Date
> Dim b As Date
> 
> a = "0:20:00"
> b = "1:00:00"
> MsgBox Minute(a)
> MsgBox Hour(b) * 60 + Minute(b)
>End Sub

8210 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free