18/04/2013, 22:27
Günlerin haftalara oturması için
If vCol = Weekday(vFirst) - 1 Then
Satırını If vCol = Weekday(vFirst, 0) - 1 Then
Değiştirildiğinde günler tam oturacaktır.