- 최초 작성일: 2003-02-06
- 최종 수정일: 2026-09-26
- 조회수: 31 회
- 작성자: 권현욱 (엑셀러)
- 강의 제목: 만년달력 만들기2
들어가기 전에
오래 전 엑셀 파일로 진행하던 강의를 웹 글로 복원한 것이라, "버튼을 눌러보세요"처럼 엑셀에서 직접 조작하라는 표현이 남아 있을 수 있습니다. 결과는 본문의 그림이나 표로 확인하실 수 있으며, 현재와 맞지 않는 내용은 보완하되 전반적인 스타일은 당시의 갬성(?)을 유지했습니다.
There is no future in any job. The future lies in the man who holds the job. 어떤 직업도 미래가 보장되지는 않는다.. 미래는 그 직업을 갖고 있는 사람 손에 달려있다. //George Crane 철 밥그릇이 깨진 지도 이미 오래 되었습니다. 하물며...
몇 강좌 전(X0310)에 배열 수식을 사용한 만년달력을 만드는 방법에 대해서 소개를
드렸습니다. 이번 시간에는 조금 쉬운 방법으로 만년달력을 만드는 방법에 대해
살펴보겠습니다.
- 최신 글을 불러오는 중...
만년달력 만들기2
핵심 요약
- 만년달력 만들기2에 필요한 핵심 작업 흐름과 엑셀 활용 방법을 원본 강좌의 순서대로 정리합니다.
- 만년달력, 달력, DATE 등 원본에서 사용된 주요 기능과 수식을 예제와 함께 확인할 수 있습니다.
- 원본 예제 데이터와 설명을 바탕으로 실제 작업에 적용할 수 있도록 구성했습니다.
이번 시간에 만들어 볼 만년달력입니다. 그럴듯 해 보이지요? ^^
참고로 아래 사진은 지난 1월에 예술의 전당에 '로뎅 전시회' 갔다가 실수로(?) 찍은
'청동시대'라는 작품입니다. 너무도 사실적인 묘사로 '로뎅이 실제 인체를 가지고
만들었다'는 구설수에 휘말리게 했던 그 유명한...
그건 그렇고...
(1) 삽입-개체 메뉴를 선택합니다.
(2) 새로 만들기 탭에서 Calendar Control O.O 항목을 선택하고 확인 버튼을 클릭합니다.
그러면 현재 날짜에 해당하는 달력이 삽입되면서 디자인 모드 도구 모음이 함께 표시됩니다.
(3) 삽입-그림-그림 파일 메뉴를 선택한 다음 적당한 그림을 삽입한 다음 크기를 조절합니다.
(4) Calendar 오브젝트에 대한 편집 작업이 끝났으면 디자인 모드 끝내기 아이콘을
클릭합니다.
참고로 시트 탭을 오른쪽 마우스 버튼으로 클릭하고 코드 보기 메뉴를 선택한 다음, VB Editor 상태에서 워크시트 오브젝트의 Activate 이벤트를 선택합니다. 아래와
같은 코드를 작성하면 워크시트가 활성화 될 때마다 날짜가 업데이트 됩니다.
Private Sub Worksheet_Activate()
Dim datYear As Date
Dim datMonth As Date
Dim datDay As Date
datYear = Year(Now())
datMonth = Month(Now())
datDay = Day(Now())
With Calendar1
.Year = datYear
.Month = Format(datMonth, "00")
.Day = Format(datDay, "00")
End With
End Sub개인적인 사정으로 앞으로도 한동안은 강좌를 제때 올리기 어려울 듯 합니다.
무슨 연유로 그런지는 게시판을 잘 살펴보신 분이라면 아실 터이므로... *^^*
3월 중순까지는 Exceller가 잠수했다 생각하고 열심히 복습하고 계시기 바랍니다.
틈나는대로 강좌 파일을 만들어 올리도록 하겠습니다.
Exceller를 대신하여 요즘 게시판에서 수고하고 계신 많은 분들께 이 자리를 빌어
감사의 말씀을 드립니다.
다음에 또...
마치며
이번 강좌에서는 '만년달력 만들기2'과 관련된 작업 방법을 원본 예제와 함께 살펴보았습니다. 필요한 부분을 하나씩 적용해 보시기 바랍니다.
