 #7
			
				
			
			
			
			
#7
		
				
				izin_rapor takibi konusunda yardımlarınızı bekliyorum 4.mesajdaki anlatılan örnek gibi
				
				
			
			
			
			
			
				
	
			
			
			
			
			
			
		 #7
			
				
			
			
			
			
#7
		 #8
			
				
			
			
			
			
#8
		 #9
			
				
			
			
			
			
#9
		 #10
			
				
			
			
			
			
#10
		 #11
			
				
			
			
			
			
#11
		Sub SonGün()
    Dim i As Date
    Dim x As Date
    i = "15/03/2006" 'Örnek Tarih 3. ayın kaç çektiğini bulacağız
    x = DateAdd("m", 1, i - (Day(i) - 1))-1
    MsgBox x 
End Sub #12
			
				
			
			
			
			
#12