dim SQL as String
dim rs As Recordset
SQL = "SELECT WEEKDAYNAME(WEEKDAY(日付フィールド),FALSE) FROM テーブル名"
Set rs = CurrentDb.OpenRecordset(SQL)
WEEKDAYでは定数が返りましたが、WEEKDAYNAMEを使うと曜日名を取得できます。
2番目の引数にFALSEを指定すると、「火曜日」のように曜日の文字が付きます。
TRUEを指定すると、「火」のように曜日の文字は付きません。