aşağıdaki sorgu ile şubat ayında işe başlamış v816lar listelenir hangi gün hangi personel sabahçı onları gösteriyor
eğer eğitim tablonuz da varsa sorguya o Eğitimtablsunda olmayanlar kriteri eklenebilir
gerisi
tarih=Clng(3 şubat 2020)
do while SorguKAyıtSayısı>0
if weekday(tarih)<>7 and weekday(tarih)<>6 then eğitim tablosuna ekle
tarih=tarih+1
do bitir
benzeri bir algoritma kullanılabilir
Not: ben eklemedim ama siz sorguya [vardiya]![mod]+3 için de tarih kriteri eklemelisiniz

SELECT liste.Kimlik, [vardiya]![mod]+3 AS Gun

FROM vardiya INNER JOIN liste ON vardiya.v0816 = liste.vardiya

WHERE (((Month([tarih]))=2))

ORDER BY liste.Kimlik, [vardiya]![mod]+3;