今日の曜日を自動的に更新したい場合は、この記事が役に立ちます。この記事では、vbaのmsgboxを介してユーザーの現在の曜日を更新することに焦点を当てています。

質問):曜日を決定するコードが必要です。

VBエディターを起動するには、以下の手順に従う必要があります。[開発者]タブをクリックします。[コード]グループから[VisualBasic]を選択します

image 1

  • [挿入]をクリックしてから[モジュール]をクリックします

image 2

これにより、新しいモジュールが作成されます。モジュールに次のコードを入力します

Sub TodaysDay()

ケースの選択DatePart( “w”、Date、vbMonday)

ケース1

MsgBox “Mon”

ケース2

MsgBox “Tue”

ケース3

MsgBox “Wed”

ケース4

MsgBox “Thur”

ケース5

MsgBox “Fri”

ケース6

MsgBox “Sat”

ケース7

MsgBox “Sun”

選択の終了

サブの終了

image 3

注:今日の日付は2015年6月5日です。つまり、金曜日の「​​vbMonday」は、月曜日を週の最初の日として返すために使用されます。日曜日が週の最初の曜日の場合は、「vbSunday」を使用する必要があります。Alt+ F8ショートカットキーを押してマクロウィンドウを開きます。作成したばかりのマクロを選択します

image 4

  • [実行]をクリックすると、今日の日付の名前が表示されます。