Vba で weekdayname 関数を使用する方法 (例付き)

VBA でWeekdayName関数を使用すると、指定された日付から曜日の名前を取得できます。

この関数を実際に使用する一般的な方法は次のとおりです。

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

この特定のマクロは、 A2:A9の範囲内の各日付の曜日の名前を検索し、その結果をB2:B9の範囲に表示します。

次の例は、 WeekdayName関数を実際に使用する方法を示しています。

注: 曜日を整数として返したい場合は、代わりにWeekday関数を使用する必要があります。

例: VBA で WeekdayName 関数を使用する方法

Excel に次の日付列があるとします。

各日付の曜日名を取得し、その結果を列 B に表示するとします。

これを行うには、次のマクロを作成できます。

 Sub FindWeekdayName()
    
Dim i As Integer

For i = 2 To 9
    Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i)))
Next i
    
End Sub

このマクロを実行すると、次の出力が表示されます。

列 B には、列 A の各日付の曜日の名前が表示されます。

例えば：

• 2023 年 1 月 1 日は日曜日です。
• 2023 年 1 月 4 日は水曜日です。
• 2023 年 2 月 23 日は木曜日です。

等々。

注: VBA WeekdayName関数の完全なドキュメントはここで見つけることができます。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBA で日付を比較する方法
VBAで日付を週番号に変換する方法
VBA で 2 つの日付の間の日数を計算する方法