Dim dt1 As Date
dt1 = Date
MsgBox dt1 ' works - 12.10.2012
Day(dt1) = 1 ' error: object required
내가 필요합니다 1.10.2012
그래서 어떤 날짜에 대해서도 해당 특정 날짜의 첫 번째 날로 dt1을 설정해야합니다.날짜를 설정하는 방법은 무엇입니까?
Dim dt1 As Date
dt1 = Date
MsgBox dt1 ' works - 12.10.2012
Day(dt1) = 1 ' error: object required
내가 필요합니다 1.10.2012
그래서 어떤 날짜에 대해서도 해당 특정 날짜의 첫 번째 날로 dt1을 설정해야합니다.날짜를 설정하는 방법은 무엇입니까?
당신은 날짜를 재구성하는 dateserial 사용할 수
예를 들어
newDate = DateSerial(Year(dt1), Month(dt1), 1)
우수. 고맙습니다. – Alegro
newDate = DateSerial (년 (DT1), 월 (DT1) , 1) – user3357963