パソコン仕事5倍塾
35,000人を指導した東大卒・元日本IBM社内講師が直伝
MENU
受講生さんの投稿
(投稿ID: 2373)
ゲストさんのコメント
(コメントID: 3801)
Sub hoge1() Dim d As Date d = 0 Debug.Print "sample1" Debug.Print "年 " & Year(d) Debug.Print "月 " & Month(d) Debug.Print "日 " & Day(d) Debug.Print "時 " & Hour(d) Debug.Print "分 " & Minute(d) Debug.Print "秒 " & Second(d) Debug.Print "小数で表現すると: " & CDbl(d) Debug.Print "" d = #1/3/1900 6:00:00 PM# Debug.Print "sample2" Debug.Print "年 " & Year(d) Debug.Print "月 " & Month(d) Debug.Print "日 " & Day(d) Debug.Print "時 " & Hour(d) Debug.Print "分 " & Minute(d) Debug.Print "秒 " & Second(d) Debug.Print "小数で表現すると: " & CDbl(d) Debug.Print "" d = #5/19/2016 1:40:23 PM# Debug.Print "sample3" Debug.Print "年 " & Year(d) Debug.Print "月 " & Month(d) Debug.Print "日 " & Day(d) Debug.Print "時 " & Hour(d) Debug.Print "分 " & Minute(d) Debug.Print "秒 " & Second(d) Debug.Print "小数で表現すると: " & CDbl(d) Debug.Print "" d = Now Debug.Print "sample4" Debug.Print "年 " & Year(d) Debug.Print "月 " & Month(d) Debug.Print "日 " & Day(d) Debug.Print "時 " & Hour(d) Debug.Print "分 " & Minute(d) Debug.Print "秒 " & Second(d) Debug.Print "小数で表現すると: " & CDbl(d) Debug.Print "" End Sub Sub hoge2() Dim d As Date d = 3.25 '3.25は、起算日から数えて3日後の朝6:00です。 Debug.Print "sample5" Debug.Print "年 " & Year(d) Debug.Print "月 " & Month(d) Debug.Print "日 " & Day(d) Debug.Print "時 " & Hour(d) Debug.Print "分 " & Minute(d) Debug.Print "秒 " & Second(d) Debug.Print "小数で表現すると: " & CDbl(d) Debug.Print "" End Sub
受講生さんのコメント
(コメントID: 3803)
Sub hoge1() > Dim d As Date > > d = 0 > Debug.Print "sample1" > Debug.Print "年 " & Year(d) > Debug.Print "月 " & Month(d) > Debug.Print "日 " & Day(d) > Debug.Print "時 " & Hour(d) > Debug.Print "分 " & Minute(d) > Debug.Print "秒 " & Second(d) > Debug.Print "小数で表現すると: " & CDbl(d) > Debug.Print "" > > d = #1/3/1900 6:00:00 PM# > > Debug.Print "sample2" > Debug.Print "年 " & Year(d) > Debug.Print "月 " & Month(d) > Debug.Print "日 " & Day(d) > Debug.Print "時 " & Hour(d) > Debug.Print "分 " & Minute(d) > Debug.Print "秒 " & Second(d) > Debug.Print "小数で表現すると: " & CDbl(d) > Debug.Print "" > > d = #5/19/2016 1:40:23 PM# > > Debug.Print "sample3" > Debug.Print "年 " & Year(d) > Debug.Print "月 " & Month(d) > Debug.Print "日 " & Day(d) > Debug.Print "時 " & Hour(d) > Debug.Print "分 " & Minute(d) > Debug.Print "秒 " & Second(d) > Debug.Print "小数で表現すると: " & CDbl(d) > Debug.Print "" > > d = Now > > Debug.Print "sample4" > Debug.Print "年 " & Year(d) > Debug.Print "月 " & Month(d) > Debug.Print "日 " & Day(d) > Debug.Print "時 " & Hour(d) > Debug.Print "分 " & Minute(d) > Debug.Print "秒 " & Second(d) > Debug.Print "小数で表現すると: " & CDbl(d) > Debug.Print "" >End Sub > >Sub hoge2() > Dim d As Date > d = 3.25 '3.25は、起算日から数えて3日後の朝6:00です。 > > Debug.Print "sample5" > Debug.Print "年 " & Year(d) > Debug.Print "月 " & Month(d) > Debug.Print "日 " & Day(d) > Debug.Print "時 " & Hour(d) > Debug.Print "分 " & Minute(d) > Debug.Print "秒 " & Second(d) > Debug.Print "小数で表現すると: " & CDbl(d) > Debug.Print "" >End Sub
たった1ヶ月で人生が劇的に変わりました
佐藤信さん
役員クラスの方から高い評価を受けるようになりました。
佐賀県 - 岩本徹さん
今までまったく知らなかったショートカットキーを使いまくっています。
東京都 - 鷹觜慶さん
年齢60才間近、営業で外回りの時間が多い私でも退社時間が1-2時間程度早くなりました。
東京都 - 宗内隆明さん
受講前もすでにパソコン得意でしたが、そんな私でも受講して本当に良かったと思えた講座です。
東京都 - 佐伯とも子さん
ここまで包括的に仕事に役立つ深い学びを受けれた講座は初めてでした
東京都 - 飯田倫子さん
2024年05月13日 00:20
2024年05月12日 16:21
2024年05月06日 19:09
2024年05月05日 07:10
2024年05月01日 14:04
2024年05月13日 10:21
2024年05月13日 10:17
2024年05月13日 10:05
2024年05月12日 20:26
2024年05月10日 13:24
2022年02月24日 10:59
2019年12月23日 05:57
2019年09月20日 12:29
表示できる投稿はありません。
この学習サイトの教材制作、サポート、システム開発をすべてやっています。
2022年02月02日 00:00
2022年02月02日 03:00
2022年02月02日 06:00
2022年02月02日 09:00
2022年02月02日 12:00
2024年02月15日 18:30
2024年02月09日 17:05
2024年01月19日 13:00
2023年12月31日 17:00
2023年12月21日 14:00
2024年05月05日 09:40
2024年05月03日 11:20
2024年05月02日 10:38
2024年05月02日 05:00
2024年05月01日 18:30
受講生さんの投稿
(投稿ID: 2373)
dateadd関数を知らなかったので、試しにdate+3と書いてみたらちゃんと動きました。
こびとちゃんにとってはdateaddの方が親切でしょうか?
selectcaseの方がすっきり見えるので、たくさん練習してスラスラ書けるように慣れていこうと思います。
ゲストさんのコメント
(コメントID: 3801)
日付の正体は小数です。
整数部分が起算日(1899/12/30)からの経過日数、小数部分は時刻です。
↓こんなサンプル動かしてみると、学びが深まるかも。
>今回は盛りだくさんでした☆
>
>dateadd関数を知らなかったので、試しにdate+3と書いてみたらちゃんと動きました。
>こびとちゃんにとってはdateaddの方が親切でしょうか?
>
>selectcaseの方がすっきり見えるので、たくさん練習してスラスラ書けるように慣れていこうと思います。
受講生さんのコメント
(コメントID: 3803)
ありがとうございます。
サンプルを動かしてみました!
シリアル値の存在は知っていたのですが、
小数部分で時刻を表していることは知りませんでした。
日付と時間・・・
ずっと別物だと勘違いしていました。
切っても切り離せないものなのに・・・(;・∀・)
>受講生 さん:
>
>日付の正体は小数です。
>整数部分が起算日(1899/12/30)からの経過日数、小数部分は時刻です。
>
>↓こんなサンプル動かしてみると、学びが深まるかも。
>
>
>
>
>>今回は盛りだくさんでした☆
>>
>>dateadd関数を知らなかったので、試しにdate+3と書いてみたらちゃんと動きました。
>>こびとちゃんにとってはdateaddの方が親切でしょうか?
>>
>>selectcaseの方がすっきり見えるので、たくさん練習してスラスラ書けるように慣れていこうと思います。
>