본문으로 바로가기
1
2
3
4
5
6
7
8
9
10
11
12
Sub datetimeNow()
    Date2 = DateTime.DateValue(DateTime.Now)
    Debug.Print (Date2)
    
    dateString = "20180619"
    dateObjct = DateSerial(CInt(Left(dateString, 4)), CInt(Mid(dateString, 52)), CInt(Right(dateString, 2)))
        
    Debug.Print (dateObject)
    
    
End Sub
 
cs


현재 날짜와 지정한 날짜의 차의를 계산 하고 싶을 때


1.현재 날짜를 dateObject로 만들어야 하고

2.원하는 날짜를 dateObject로 만들어서


그 차이를 계산 해야 한다.


그게 1번과 2번이다.


end.





댓글을 달아 주세요