Tweet

Pocket

テキストボックスに日付を入力する作業は、何気に面倒なので、よく使う日付
例えば、今日や昨日についてはコマンドボタンで日付を取得できるようにします。

先にユーザーフォームにコマンドボタンを二つ追加して、Captionを今日、昨日に変更します。


追加したコマンドボタンに次のVBAコードを入力します。

今日→Date
昨日→Date-1
その先一昨日を追加するのであれば、
一昨日→Date-2
という形で日付を計算できます。

実行してみます。

このような入力方法にすれば、少しですが効率的に出納帳がつけられます。