日付時刻:年・月・日を取得(Year、Month、Day 関数)
日付から年・月・日を取得する関数
【書式】
date_year = Year ( date )
date_month = Month ( date )
date_day = Day ( date )
【引数・戻り値】
- date ・・・ 日付をあらわす値・文字列・数式
- date_year ・・・ 年を表すバリアント型(内部処理形式 Integer)の値
- date_month ・・・ 月(1~12 の範囲の整数)を表すバリアント型(内部処理形式 Integer)の値
- date_day ・・・ 日(1~31 の範囲の整数)を表すバリアント型(内部処理形式 Integer)の値
引数の date に有効でない値を指定するとエラーになります。
日付から年・月・日を取得する関数の使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 |
Sub Sample_YearMonthDay() Dim myDate1, myDate2, myDate3, myDate4, mydate5 Dim myNumber As Long myDate1 = "2015年10月1日" myDate2 = #11/30/1999# myDate3 = "2000-2-1" myDate4 = "H23/5/20" mydate5 = "昭和59年8月25日" myNumber = 36955 Debug.Print Year(myDate1) Debug.Print Year(myDate2) Debug.Print Year(myDate3) Debug.Print Year(myDate4) Debug.Print Year(mydate5) Debug.Print Year(myNumber) Debug.Print Year(0) Debug.Print Debug.Print Month(myDate1) Debug.Print Month(myDate2) Debug.Print Month(myDate3) Debug.Print Month(myDate4) Debug.Print Month(mydate5) Debug.Print Month(myNumber) Debug.Print Month(0) Debug.Print Debug.Print Day(myDate1) Debug.Print Day(myDate2) Debug.Print Day(myDate3) Debug.Print Day(myDate4) Debug.Print Day(mydate5) Debug.Print Day(myNumber) Debug.Print Day(0) End Sub |
実行結果
関連記事
-
-
色の設定(Color プロパティ・RGB 関数)
Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …
-
-
乱数を生成する(Rnd 関数)
Rnd 関数の使い方 Rnd 関数は、0 以上、1 未満の範囲の乱数を単精度浮動 …
-
-
文字列:文字列変数の値を右詰めまたは左詰めにする(RSet ステートメント・LSet ステートメント)
RSet ステートメント・LSet ステートメント 【書式】 < RSet ステ …
-
-
変数のデータ型・宣言(Dim ステートメント)
変数の宣言 一般的な方法 【書式】 Dim varname [ As type, …
-
-
指定した文字列を数値に変換する(Val 関数)
Val 関数 の使い方 Val 関数は、指定した文字列に含まれる数字を数値として …
-
-
変数がEmpty 値かどうかをチェックする( IsEmpty 関数 )
IsEmpty 関数の使い方 【書式】 result = IsEmpty ( e …
-
-
文字列:指定した文字の文字コードを取得する(Asc 関数)
Asc 関数 【書式】 result = Asc ( string ) 引数・戻 …
-
-
文字列:文字列右から指定文字数取得(Right 関数,RightB 関数)
Right 関数・RightB 関数 の使い方 【書式】 result_righ …
-
-
VBA の演算子(比較演算子)
比較演算子 比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …
-
-
画面の更新を停止(ScreenUpdating プロパティ)
画面の更新を停止 マクロを実行すると、画面が更新されます。これにより、実行速度が …