今回は、「Format」関数を使用してセルの表示形式を変更する方法について詳しく解説します。

ぜひ参考にしてみてください。
それでは見ていきましょう！

⬛︎こんな事ができるようになる！

この関数を使用することで、数値や日付、文字列などのデータを特定の形式に整形することができます。

⬛︎忙しい人向けのコピペ用ソースコード

Sub format変換()
　Dim Befor
　　Befor = 変更する数値・文字
　　入力セル・変数 = Format(Befor, 書式コード)
End Sub

変更する数値・文字・入力セル・変数・書式コードはカスタムして使用してください。

⬛︎構文の説明

まず、使用する関数についてです「Format関数」になります。
関数仕様としては下記の通りです。

⬛︎数値の表示形式を変更する方法

・小数点以下の桁数を指定する

まず、小数点以下の桁数を指定してみましょう。
下図の見本をご覧ください。

今回は「123.456」という数値の値を小数点２桁に変更したいと思います。

⬛︎日付の表示形式を変更する方法

日付の表示形式を変更する際にも、Format関数を利用することができます。

・日付の書式を指定する

まず、日付の書式を指定してみましょう。
下図の見本をご覧ください。

日付の表示形式を指定する際は、書式コードを使用します。
例えば、「“yyyy/mm/dd”」という表示形式を使用すると、年月日の順で表示されます。

以下は具体的なコード例です。

上記のコードを実行すると、セル”C5“には現在の日付が「2023/07/3」という形式で表示されます。

・日付の表示言語を変更する

次に、日付の表示言語を変更してみましょう。
下図の見本をご覧ください。

通常であれば下図のように「日本」になっています。

日付の表示言語を変更する場合は、書式コードの前に「[$-言語コード]」を追加します。
例えば、英語表記の場合は「[$-409]」を使用します。

以下は具体的なコード例です。

上記のコードを実行すると、セル”C5“には現在の日付が英語表記の「2023/07/3」という形式で表示されます。

⬛︎文字列の表示形式を変更する方法

文字列の表示形式を変更する際にも、Format関数を使用することができます。

・特定の文字列パターンを指定する

まず、特定の文字列パターンを指定してみましょう。
下図の見本をご覧ください。

今回は「VBA」という文字に「ABC」という文字を追加してみましょう。

例えば、文字列の先頭に「ABC」を追加する場合は、「“ABC” & 対象の文字列」という形式で指定します。以下は具体的なコード例です。

上記のコードを実行すると、セル”C5“には「ABC VBA」という文字列が表示されます。

・文字列を大文字または小文字に変換する

次に、文字列を大文字または小文字に変換してみましょう。
下図の見本をご覧ください。

文字列を大文字に変換する場合は、「“>”」関数を使用します。
小文字に変換する場合は、「“＜”」関数を使用します。

以下は具体的なコード例です。

ードを実行すると、セル”C5“には「VBA」という文字列が表示されます。

⬛︎よくあるエラーと対処法

・ “型不一致”エラー

 対策: Format関数の引数の型が正しく一致していることを確認してください。
例えば、数値型の引数を指定する場合は、文字列や日付型ではなく数値型のデータを使用してください。

・”無効な書式コード”

 対策: 使用する書式コードが正しい形式であることを確認してください。
書式コードには特定のルールがあります。

間違った形式の書式コードを使用している場合は、正しい書式コードを確認し、修正してください。

・”引数が不足しています”

対策: Format関数に必要な引数がすべて指定されていることを確認してください。
必要な引数が不足している場合は、引数を追加してください。

・”式が複雑すぎます”

対策: Format関数の引数が複雑すぎる場合に発生します。
このエラーを回避するためには、引数を単純化する必要があります。

長い式や複数の関数の組み合わせを使用する場合は、一時変数を使用して式を分割することを検討してください。

■練習問題

練習問題も別の記事でまとめているので是非参考にしてみてください！

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

⬛︎まとめ

いかがだったでしょうか？

今回は、マクロVBAにおける表示の変更について「Format」関数を中心に解説しました。

数値や日付、文字列などのデータを特定の形式に整形する際に、この関数を活用することができます。

Format関数の使い方や具体的なコード例を通じて、セルの表示形式を柔軟に変更する方法を学びました。

ぜひ活用してみてください。

それでは次回の記事でお会いしましょう。

この記事では、Date関数を使った日付の取得方法について詳しく解説します。
さらに応用では日付の計算も紹介していますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんな事ができるようになる！

・現在の日付を簡単に取得できる
・日付をセルに表示することができる

⬛︎忙しい人向けのコピペ用ソースコード

Sub 日付見本()
対象のセル・変数 = Date
End Sub

対象のセル・変数をカスタムして使用してください。

⬛︎構文の説明

まず、使用する関数についてですが「Date関数」になります。
関数仕様としては下記の通りです。

対象のセル・変数= Date

引数も使用しないとてもシンプルな関数です！

例えば、現在の日付を取得して変数に格納する場合は以下のようになります。

このようにすることで、currentDate 変数に現在の日付が格納されます。

⬛︎応用例

・日付をセルに表示する

Date関数を使用すると、日付をセルに表示することも可能です。
以下の例をご覧ください。

今回は見本で「C3」に現在の日付を入力したいと思います。
ではソースコードを見ていきましょう

実行した結果はこちらです。

ちなみに現在は「2023/6/26」なので問題なく機能していますね。

・日付の計算に使用する

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Date 関数 (Visual Basic for Applications) | Microsoft Learn

⬛︎まとめ

いかがだったでしょうか？

この記事では、マクロVBAを使用して現在の日付を表示する方法について解説しました。

Date関数を使えば簡単に現在の日付を取得できますし、日付をセルに表示することも可能です。

ぜひ、これらの方法を活用して日付を取得し、Excelの作業効率を高めてください。

それでは次回の記事でお会いしましょう。

今回は年月日または時分秒を取得できる関数の一覧をまとめてみました。

各詳細を確認したい場合はリンクから飛んでいただければ詳しい使用方法やエラーの原因・対処法についてもまとめています。

実際の画面を用いて説明してますので初心者方も是非参考にしてみてください。

それでは見ていきましょう。

■年の取得・出力方法

まずは年の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Year(対象となるデータ)

現在の年を取得する方法はこちら。

変数・出力先＝Year(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA㊳】Year関数で日付の年・西暦を取得・抽出する方法と、抽出できない原因と対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■月の取得・出力方法

次は月の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Month(対象となるデータ)

現在の月を取得する方法はこちら。

変数・出力先＝Month(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA㊴】Month関数で日付の月を取得・抽出する方法と、抽出できない原因とエラーの対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■日の取得・出力方法

年月日の最後の日の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Day(対象となるデータ)

現在の日を取得する方法はこちら。

変数・出力先＝Day(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA】Day関数で日付の日を取得・抽出する方法と、抽出できない原因とエラーの対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■時の取得・出力方法

次に時分秒に移りたいと思います。まずは時の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Hour(対象となるデータ)

現在の時を取得する方法はこちら。

変数・出力先＝Hour(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA】Hour関数で時刻の時を取得・抽出する方法と、抽出できない原因と対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■分の取得・出力方法

次に分の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Minute(対象となるデータ)

現在の分を取得する方法はこちら。

変数・出力先＝Minute(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA】Minute関数で時刻の分を取得・抽出する方法と、抽出できない原因と対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■秒の取得・出力方法

時分秒の最後の秒の出力方法についてです。

使用する関数の構文はこちら。

変数・出力先＝Second(対象となるデータ)

現在の秒を取得する方法はこちら。

変数・出力先＝Second(Now)

詳しくは下記リンクにまとめています☟

【マクロVBA】Second関数で時刻の秒を取得・抽出する方法と、抽出できない原因と対処法 ► 独学エクセル塾 (dokugakuexcel.com)

■まとめ

いかがだったでしょうか。

日時データとセットでデータを管理している場合には

年月日または時分秒を取得して絞り込みを行ったり集計を行ったりする場面が多いと思います。

その際に本記事の構文をコピーして当てはめてみてください。

各詳細を表したリンクでは活用事例や実際のプログラム、よくあるエラーと対処法についてもまとめていますので是非参考にしてみてください。

それでは次回の記事でお会いしましょう。

今回はそのSecond関数についての使用方法と実際の活用事例について紹介します。
さらには現在の秒を出力する方法も説明したいと思います。

Second関数を使用する上で抽出・取得できないなど、不具合の原因・エラーの対応についてもまとめてますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の時刻データから秒を取得することができる
・現在の時刻の秒を取得することができる

⬛︎関数の仕組み

変数・出力先＝Second(対象となるデータ)

⬛︎Second関数の使用方法

ではここから実際にSecond関数の使用方法について紹介します。

・対象セルまたは変数の時刻データから秒を取得する

まずは対象セル・変数から秒を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「12:45:32」という時刻データが入っています。
こちらの時刻データから秒をD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Second(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 時刻の秒を出力()

Cells(3, 4) = Second(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「12:45:32」から秒を取得すると「32」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から秒を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の時刻を「21:19:45」にしてみましょう。]

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 時刻の秒の出力()

Dim N As Long

N = Second(Cells(3, 2))

MsgBox “対象の時刻は” & N & “秒です”

End Sub

実行した結果はこちらです。

取得した秒をメッセージボックスで表示することができました。

・現在の秒を取得する

先ほどまではセルに入力してあった時刻データから秒を取得しましたが、
現在の日時からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Second(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の日を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の時刻の秒の出力()

Dim N As Long

N = Second(Now)

MsgBox “現在の時刻は” & N & “秒です”

End Sub

実行した結果はこのようになります。

実行した際の時刻は23秒なので「23」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の秒を出力してみましょう。
プログラムはこのようになります。

Sub 現在の時刻の秒をセルに出力()

Cells(3, 2) = Second(Now)

End Sub

実行した結果はこのようになります。

B3に「40」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎時刻の秒のデータを取得できないときの対処法とよくあるエラーについて

・時刻の秒のデータを取得できない

こちらは変数名にSecondなど使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでSecond関数を知る前までは時のデータを「Second」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の秒の出力()

Dim Second

Second = Second(Now)

MsgBox “現在の時刻の秒は” & N & “秒です”

End Sub

現在の秒を「Second」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Seconddata」など「Second」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に時刻の秒を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Second関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Second 関数 (microsoft.com)

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Second関数で秒を出力したり、絞り込みを行ったり、用途は様々です。

是非活用して秒を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

今回はそのMinute関数についての使用方法と実際の活用事例について紹介します。
さらには現在の分を出力する方法も説明したいと思います。

Minute関数を使用する上で抽出・取得できないなど、不具合の原因・エラーの対応についてもまとめてますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の時刻データから分を取得することができる
・現在の時刻の分を取得することができる

⬛︎関数の仕組み

変数・出力先＝Minute(対象となるデータ)

⬛︎Minute関数の使用方法

ではここから実際にMinute関数の使用方法について紹介します。

・対象セルまたは変数の時刻データから分を取得する

まずは対象セル・変数から分を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「12:45:32」という時刻データが入っています。
こちらの日時データから分をD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Minute(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 時刻の分を出力()

Cells(3, 4) = Minute(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「12:45:32」から分を取得すると「45」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から分を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の時刻を「21:19:45」にしてみましょう。

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 時刻の分の出力()

Dim N As Long

N = Minute(Cells(3, 2))

MsgBox “対象の時刻は” & N & “分です”

End Sub

実行した結果はこちらです。

取得した分をメッセージボックスで表示することができました。

・現在の分を取得する

先ほどまではセルに入力してあった時刻データから分を取得しましたが、
現在の日時からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Minute(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の日を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の時刻の分の出力()

Dim N As Long

N = Minute(Now)

MsgBox “現在の時刻は” & N & “分です”

End Sub

実行した結果はこのようになります。

実行した際の時刻は54分なので「54」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の分を出力してみましょう。
プログラムはこのようになります。

Sub 現在の時刻の分をセルに出力()

Cells(3, 2) = Minute(Now)

End Sub

実行した結果はこのようになります。

B3に「54」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎時刻の分のデータを取得できないときの対処法とよくあるエラーについて

・時刻の分のデータを取得できない

こちらは変数名にMinuteなど使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでMinute関数を知る前までは時のデータを「Minute」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の時の出力()

Dim Minute

Minute = Minute(Now)

MsgBox “現在の時刻の時は” & N & “分です”

End Sub

現在の分を「Minute」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Minutedata」など「Minute」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に時刻の分を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Minute関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Minute 関数 (Visual Basic for Applications) | Microsoft Docs

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Minute関数で分を出力したり、絞り込みを行ったり、用途は様々です。

是非活用して分を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

今回はそのHour関数についての使用方法と実際の活用事例について紹介します。
さらには現在の時を出力する方法も説明したいと思います。

Hour関数を使用する上で抽出・取得できないなど、不具合の原因・エラーの対応についてもまとめてますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の時刻データから時を取得することができる
・現在の時刻の時を取得することができる

⬛︎関数の仕組み

変数・出力先＝Hour(対象となるデータ)

⬛︎Hour関数の使用方法

ではここから実際にHour関数の使用方法について紹介します。

・対象セルまたは変数の時刻データから時を取得する

まずは対象セル・変数から時を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「12:45:32」という時刻データが入っています。
こちらの時刻の時をD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Hour(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 時刻の時を出力()

Cells(3, 4) = Hour(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「12:45:32」から時を取得すると「12」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から時を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の時刻を「21:19:45」にしてみましょう。

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 時刻の時の出力()

Dim N As Long

N = Hour(Cells(3, 2))

MsgBox “対象の時刻は” & N & “時です”

End Sub

実行した結果はこちらです。

取得した時をメッセージボックスで表示することができました。

・現在の時を取得する

先ほどまではセルに入力してあった時刻データから時を取得しましたが、
現在の日時からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Hour(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の日を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の時刻の時の出力()

Dim N As Long

N = Hour(Now)

MsgBox “現在の時刻は” & N & “時です”

End Sub

実行した結果はこのようになります。

実行した際の時刻は21時なので「21」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の時を出力してみましょう。
プログラムはこのようになります。

Sub 現在の時刻の時をセルに出力()

Cells(3, 2) = Hour(Now)

End Sub

実行した結果はこのようになります。

B3に「21」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎時刻の時のデータを取得できないときの対処法とよくあるエラーについて

・時刻の時のデータを取得できない

こちらは変数名にHourなど使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでHour関数を知る前までは時のデータを「Hour」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の時の出力()

Dim Hour

Hour = Hour(Now)

MsgBox “現在の時刻の時は” & N & “時です”

End Sub

現在の時を「Hour」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Hourdata」など「Hour」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に時刻の時を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Hour関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Hour 関数 (Visual Basic for Applications) | Microsoft Docs

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Hour関数で時を出力したり、絞り込みを行ったり、用途は様々です。

是非活用して時を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

今回はそのDay関数についての使用方法と実際の活用事例について紹介します。
さらには現在の日を出力する方法も説明したいと思います。

Day関数を使用する上で抽出・取得できないなど、不具合の原因・エラーの対応についてもまとめてますので
是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の日付データから日を取得することができる
・現在の日を取得することができる

⬛︎関数の仕組み

変数・出力先＝Day(対象となるデータ)

⬛︎Day関数の使用方法

ではここから実際にDay関数の使用方法について紹介します。

・対象セルまたは変数の日付データから日を取得する

まずは対象セル・変数から日を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「2022/8/1」という日付データが入っています。
こちらをD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Day(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 日の出力()

Cells(3, 4) = Day(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「2022/8/1」から日を取得すると「1」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から日を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の日付を「2023/3/14」にしてみましょう。

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 日の出力()

Dim N As Long

N = Day(Cells(3, 2))

MsgBox “対象の日は” & N & “日です”

End Sub

実行した結果はこちらです。

取得した日をメッセージボックスで表示することができました。

・現在の日を取得する

先ほどまではセルに入力してあった日付データから日を取得しましたが、
現在の日からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Day(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の日を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の日の出力()

Dim N As Long

N = Day(Now)

MsgBox “現在の日は” & N & “日です”

End Sub

実行した結果はこのようになります。

実行した際の日は26日なので「26」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の日を出力してみましょう。
プログラムはこのようになります。

Sub 現在の日をセルに出力()

Cells(3, 2) = Day(Now)

End Sub

実行した結果はこのようになります。

B3に「26」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎日のデータを取得できないときの対処法とよくあるエラーについて

・日データを取得できない

こちらは変数名にDayを使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでDay関数を知る前までは日データを「Day」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の日の出力()

Dim Day

Day = Day(Now)

MsgBox “現在の日は” & N & “日です”

End Sub

現在の日を「Day」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Daydata」など「Day」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に日を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Day関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Day 関数 (Visual Basic for Applications) | Microsoft Docs

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Day関数で日を出力したり、絞り込みをおこなったり用途は様々です。

是非活用して日を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

今回はそのMonth関数についての使用方法と実際の活用事例について紹介します。
さらには現在の月を出力する方法も説明したいと思います。

Month関数を使用する上で抽出・取得できないなど、不具合・エラーの対応についてもまとめてますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の日付データから月を取得することができる
・現在の月を取得することができる

⬛︎関数の仕組み

変数・出力先＝Month(対象となるデータ)

⬛︎Month関数の使用方法

ではここから実際にMonth関数の使用方法について紹介します。

・対象セルまたは変数の日付データから月を取得する

まずは対象セル・変数から月を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「2022/8/1」という日付データが入っています。
こちらをD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Month(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 月の出力()

Cells(3, 4) = Month(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「2022/8/1」から月を取得すると「8」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から月を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の日付を「2023/3/14」にしてみましょう。

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 月の出力()

Dim N As Long

N = Month(Cells(3, 2))

MsgBox “対象の月は” & N & “月です”

End Sub

実行した結果はこちらです。

取得した月をメッセージボックスで表示することができました。

・現在の月を取得する

先ほどまではセルに入力してあった日付データから月を取得しましたが、
現在の月からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Month(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の月を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の月の出力()

Dim N As Long

N = Month(Now)

MsgBox “現在の月は” & N & “月です”

End Sub

実行した結果はこのようになります。

実行した際の月は6月なので「6」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の月を出力してみましょう。
プログラムはこのようになります。

Sub 現在の月をセルに出力()

Cells(3, 2) = Month(Now)

End Sub

実行した結果はこのようになります。

B3に「6」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎月のデータを取得できないときの対処法とよくあるエラーについて

・月データを取得できない

こちらは変数名にMonthを使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでMonth関数を知る前までは月データを「Month」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の月の出力()

Dim Month

Month = Month(Now)

MsgBox “現在の月は” & N & “月です”

End Sub

現在の月を「Month」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Monthdata」など「Month」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に月を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Month関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Month 関数 (Visual Basic for Applications) | Microsoft Docs

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Month関数で月を出力したり、絞り込みをおこなったり用途は様々です。

是非活用して月を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

今回はそのYear関数についての使用方法と実際の活用事例について紹介します。
さらには現在の年を出力する方法も説明したいとおもいます。

Year関数を使用する上で抽出・取得できないなど、不具合・エラーの対応についてもまとめてますので
是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんなことができるようになる！

・対象セル・変数内の日付データから年・西暦を取得することができる
・現在の年・西暦を取得することができる

⬛︎関数の仕組み

変数・出力先＝Year(対象となるデータ)

⬛︎Year関数の使用方法

ではここから実際にYear関数の使用方法について紹介します。

・対象セルまたは変数の日付データから年・西暦を取得する

まずは対象セル・変数から年・西暦を取得する方法を見ていきましょう。
見本で下図のようなシートを用意しました。

B3に日時データの「2022/8/1」という日付データが入っています。
こちらをD3に出力してみましょう。

関数の仕組みは以下の通りです。
変数・出力先＝Year(対象となるデータ)

ではこちらの構文に当てはめていきたいと思います。
変数・出力先はD3に出力するので「Cells(3, 4) 」となります。

「Range(“D3”)」でも構いません。
対象データはB3の日時データを参照するので「B3」ですね。

実際に作成したプログラムはこちらです。

Sub 年の出力()

Cells(3, 4) = Year(Cells(3, 2))

End Sub

では実行してみましょう。
結果はこのようになります。

B3の「2022/8/1」から年・西暦を取得すると「2022」となり
その結果を「D3」に出力することができました。

先ほど説明した方法は直接、別のセルに出力する方法でしたが
変数へ格納することも可能です。

ではB3の日時から年・西暦を抜き出し、メッセージボックスで表示させてみましょう。
今回のB3の日付を「2023/3/14」にしてみましょう。

変数は何でも良いのですが変数「N」に格納したいと思います。

プログラムはこのようになります。

Sub 年の出力()

Dim N As Long

N = Year(Cells(3, 2))

MsgBox “対象の年・西暦は” & N & “年です”

End Sub

実行した結果はこちらです。

取得した年・西暦をメッセージボックスで表示することができました。

・現在の年・西暦を取得する

先ほどまではセルに入力してあった日付データから年・西暦を取得しましたが、現在の年・西暦からも取得することができます。

使用するのは「Now」です。
文字通り今という意味を持ちます。

使用方法は簡単で「Year(対象となるデータ)」の対象となるデータを「Now」に変えるだけです。
では見本で現在の年・西暦を変数Nに格納してメッセージボックスで出力してみましょう。

プログラムはこのようになります。

Sub 現在の年の出力()

Dim N As Long

N = Year(Now)

MsgBox “現在の年・西暦は” & N & “年です”

End Sub

実行した結果はこのようになります。

実行した際の年・西暦は2022年なので「2022」をメッセージで表示させることができました。
もちろん、セルへの出力も可能です。

今回はB3に現在の年・西暦を出力してみましょう。
プログラムはこのようになります。

Sub 現在の年をセルに出力()

Cells(3, 2) = Year(Now)

End Sub

実行した結果はこのようになります。

B3に「2022」が出力されました。
使用方法はシンプルなのでぜひ活用してみてください。

⬛︎年・西暦のデータを取得できないときの対処法とよくあるエラーについて

・年・西暦データを取得できない

こちらは変数名にYearを使用していないか確認してみてください。
私自身も変数名は誰でもわかるように英語に直訳した単語を変数として使用してました。
なのでYear関数を知る前までは年・西暦データを「Year」という変数に格納していました。

しかしこれでは関数と変数が重複してしまい、機能しなくなります。

実際にプログラムを用意しました。

Sub エラーの出る現在の年の出力()

Dim Year

Year = Year(Now)

MsgBox “現在の年・西暦は” & N & “年です”

End Sub

現在の年・西暦を「Year」という変数に格納するプログラムですが
実行するとエラーになります。

つまり変数名を「Yeardata」など「Year」にならないようにしてみてください。

・適切な結果が出力されない

こちらは変数に年・西暦を格納する際に
変数の形式がDateになっている可能性があります。

日時データで「Date」の変数の形式を指定するのは正解ですが
Year関数での出力結果は数値なので「Date」では日時データに変換されてしまいます。

なので「Long」などの整数形式が好ましいです。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが
マイクロソフト公式の説明については下記のリンクを参照してください。☟

Year 関数 (Visual Basic for Applications) | Microsoft Docs

⬛︎まとめ

いかがだったでしょうか。
日時データと合わせて管理している場合などに
Year関数で年・西暦を出力したり、絞り込みをおこなったり用途は様々です。

是非活用して年・西暦を取得してみてください

日時データから年月日または時分秒を取得する方法を下記リンクでまとめています。

【マクロVBA】日時データ系総まとめ!年月日時分秒を対象セルや変数、現在値から取得・抽出・出力する ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。