DatePicker 만들기 - 1 (Calendar용 User Form 준비)

 

□ User Form 추가

• 이름 : formCalendar
• Caption : DatePicker
• 날짜에 사용할 Control을 선택 : 명령단추나 레이블 등을 사용할 수 있는데
                                                   여기 설명에는 레이블(Label) 기준으로 진행                                              

 

□  주차명에 해당하는 레이블 생성

• 왼쪽에 주차번호를 넣고, 일~토요일 7개를 넣어야 하므로 적절한 위치에 첫번째 레이블 생성
• 첫번째 레이블
  - 이름 : lbT1 
  - 크기 : Width = 15, Height = 15 
  - Caption : 일
  - TextAlign : fmTextAlignCenter
  - Font : 맑은 고딕,  보통, 크기=10
• 두번째 ~ 일곱번째 레이블 : 첫번째를 복사
  - 이름을 lbT2 ~lbT7 으로 수정하고, Caption을 월~토 로 수정하고 적절한 간격으로 배치
  - 일요일과 토요일은 글자 색을 변경

□  날짜에 해당하는 레이블 생성

• 주차 제목과 동일한 방식으로 6주간에 해당하는 42개를 추가
• 이름은 lbD1 ~lbD42 까지, Caption은 1~42까지 부여
• 일요일과 토요일은 글자색을 변경

 

□  주차번호에 해당하는 레이블 생성

• 일요일 날짜 왼쪽에 주차번호로 사용할 조금 넓은 레이블을 6주에 맞게 추가
• 이름은 lbW1~lbW6, Caption은 W01~W06으로 부여
• 글자 크기는 좀 작게 8로 지정 -> 크기도 이에 맞게 Height=12, Width=24
• 위치는 날짜 레이블의 아래쪽에 맞추기 

 

□  연도와 월에 해당하는 레이블 생성

• 양식 맨 위쪽에 좀 큰 글씨가 들어가도록 레이블 생성
• 이름은 lbYEAR, lbMONTH 으로
• Caption은 올해와 당월로 기재

 

□  지난달과 다음달에 해당하는 레이블 생성

• 이름은 lbLEFT, lbRIGHT 으로
• Caption은 <, >  으로

 

□  DatePicker로 Excel 시트에 작용할 명령단추 생성

• 선택한 날짜를 입력할 [OK] 버튼
• 달력의 날짜를 오늘로 이동할 [Today] 버튼
• 시트에 입력되어 있던 날짜를 지울 [Delete] 버튼

모든 레이블과 명령단추가 추가된 상태

 

DatePicker-1.xlsm

0.02MB