Skill Note

平凡なエンジニアがメモ代わりにプログラミング, インフラ, ネットワークを書き綴るブログ

VBAで形式を指定して日付を取得する

   

VBAで西暦や和暦の日付形式に変換するには「FORMAT」関数に引数を指定することで意図した日付形式に変換することができます。

日付を表示

Date関数で今日の日付を取得して変換します。

'日付表示(今日の日付が2019年12月1日の場合)
MsgBox Format(Date, "yyyyMMdd")     '20191201
MsgBox Format(Date, "yyMMdd")       '191201
MsgBox Format(Date, "yy/M/d")       '19/12/1
MsgBox Format(Date, "ge/M/d")       'R1/12/1
MsgBox Format(Date, "gge/M/d")      '令1/12/1
MsgBox Format(Date, "ggge/M/d")     '令和1/12/1
MsgBox Format(Date, "ggge年M月d日")  '令和1年12月1日

時刻表示

Time関数で現在の時刻を取得して変換します。

'時刻表示(現在の時刻が22時10分1秒の場合
MsgBox Format(time, "hh:mm:ss")     '22:10:01
MsgBox Format(time, "h:m:s")        '22:10:1
MsgBox Format(time, "h:m:s AM/PM")  '10:10:1 PM

日付と時刻を表示

Now関数で今日の日付と現在の時刻を取得して変換します。

'日付と時刻を表示(2019年12月1日 22時10分1秒の場合)
MsgBox Format(Now, "yyyyMMdd hh:mm:ss") '20191201 22:10:01

 

Google AdSense PC

Google AdSense PC

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

  関連記事

microsoft
[Windows]WSUSサーバの構築手順 4/6

Windows 2008 R2サーバにWSUSサーバを構築する WSUS(Windows Server Update Service)のインストール [スタート …

microsoft
Excelのセル幅に合わせて縦横比を維持したまま画像サイズを自動調整する方法

VBAで画像を挿入することができますが、単純にセル幅に合わせて画像サイズを変更すると、縦長や横長の画像として挿入されます。 縦横比を維持したまま、画像を挿入する …

microsoft
[Windows]指定サイズのファイルを作成する

ネットワークの通信速度などを調査する場合にサイズの大きなファイルを作成する必要があります。 この記事では「fsutil」コマンドを使用したダミーファイルの作成方 …

microsoft
Excel VBAでOracleのデータを参照するマスター検索機能を作成する

エクセルのVBAでOracleに保存されているマスタを検索する機能を作成する機会がありましたので、サンプルプログラムを記載します。 Oracleへの接続設定 V …

microsoft
VBAで指定フォルダ内の全てのExcelファイル・シートを順番に開く方法

この記事では、VBAで指定フォルダ内の全てのExcelファイル・シートを順番に開く方法について記載します。 指定フォルダの選択は、ダイアログを表示して任意の場所 …

microsoft
VBAからOracleのストアドプロシージャを実行する方法

VBAからOracleのストアドプロシージャを実行する方法について記載します。 VBAからOracleに接続する方法は以前の記事を参考にしてください。 ストアド …

microsoft
[Windows]IISセッション管理(状態サーバ)

IISのセッションをアウトプロセスで管理する方法 IISのセッションはインプロセスが既定設定となっておりワーカープロセスが再起動されるたびにセッション情報が破棄 …

microsoft
VBAでひらがな・カタカナの小文字(捨て仮名)を全角に変換する

VBAで半角文字から全角文字に変換したり、ひらがなをカタカナに変換するには、「StrConv」関数に引数を指定することで意図した文字に変換することができます。た …

microsoft
Office展開ツールを使用してMicrosoft(Office)365のインストールと更新プログラムを配信する

この記事では、Office展開ツール(ODT)を使用して、社内ネットワーク上のサーバーからMicrosoft365のインストール、更新プログラムを配信する方法を …

microsoft
[Oracle]VBAからSELECT文を実行しデータを取得する方法

VBAからOracleデータベースでSELECT文を実行してデータを取得するライブラリを作成しましたので記載します。 Oracle接続にはOracle Clie …