Arkadaşlar nöbet çizelgesine çalışma saatlerini otomatik dağıtmak istiyorum ancak bu iş için kullandığım if için gerekli kuralları bir türlü yazamadım. bu yüzden yardıma ihtiyacım var.

Kuralım şöyle olacak:
Kısaca cumartesi pazar ve resmi tatil günleri olmayacak. kısaltma ve 16 , 24 yazan günlerin ertesi günü boş olacak şekilde diğer alanlara atamak istiyorum.


[Resim: https://i.hizliresim.com/a12mb4.png]



[code=vba]Dim inta As Integer, in