엑셀Class- VBA 매달1장 달력 만들기(작성중)

인터넷을 통해 아래 두가지를 캡쳐하여  엑셀에 붙여넣기

B18셀에 2022/4/1을 입력

아래 B19셀에 =B18+1을 입력

B18셀 오른쪽 아래에 마우스를 위치하여 검정 십자가일 때 클릭하여 아래로 적당히 드래그

 

A18셀에 =B18을 입력 엔터 후

 

A18셀 선택한 상태에서 Ctrl + 1 을 누른다. 셀 서식의 단축키이다. 표시형식에서 사용자 지정을 선택 후 형식칸에 aaa를 입력 확인 요일 한글자로 표현 됨.

 

검정십자 모양을 클릭 아래로 드래그 한다

 

C18셀에 =WEEKDAY(B18)을 입력 검정 십자 모양 아래로 적당히 드래그하여 토요일은 7, 일요일은 1을 나오는 것을 확인

 

A18에서 A48까지 선택  홈 - 스타일 - 조건부서식 - 새규칙 클릭

새 서식 규칙에서 수식을 사용하여 서식을 지정할 셀 결정 선택 아래 칸에 =weekday(A18)=7 입력  * 참고 셀 주소 입력시 셀 클릭하면  * $A$18로 표시된다. F4키를 여러번 눌려  * $표시를 없앨 수 있다. 서식을 눌러 글꼴 - 굵게 - 파랑 선택 후 확인, 또 확인

 

토요일은 파란색으로 표시됨

요일전체를 선택 후 조건부 서식의 규칙관리를 클릭 새규칙 클릭!!

수식을 사용하여 서식을 지정할 셀 결정 수식에 =weekday(A18)=1 을 입력

글꼴탭에서 굵게 - 빨강 을 선택 후 확인 또 확인

 

일요일은 빨강으로 표시됨을 확인

 

B16셀에 2022를 입력하면 인근셀의 영향을 받아 2022에 해당되는 1905년 7월 14일이 나온다.

 

B16셀 선택하여 Ctrl + 1 (셀서식 단축키) 표시형식을 일반으로 변경 확인, 확인

 

년, 5, 월 을 각각 3개의 셀에 입력한다.

 

함수 찾기 수식 - 함수삽입  함수 검색에 날짜 - 검색 DATE를 선택 후 아래의 설명을 읽어본다.

 

B18셀에 수식 =DATE(B16,B17,1) 을 입력 2022년 5월 1일

 

데이터 데이터 유효성 검사 설정에서 제한 대상 - 목록 원본에 1에서 12까지 입력 1,2,3,4,5,6,7,8,9,10,11,12

 

목록으로 나오는 것을 확인 후 달을 바꾸어 본다.

 

C열의 간격을 좁혀준다. 아래 그림 확인

 

N17셀에 공휴일 정보 N18셀에 1/1을 입력한다 자동으로 입력하는 날의 년도가 입력된다.(2022)

 

N18셀을 선택 후 셀서식(Ctrl +1)에서 날짜를 선택한 후 다시 사용자 지정을 선택하여 년도는 yyyy 달은 mm 일은 dd  입력됨을 확인함

 

yyyy.mm.dd.aaa 입력

 

aaa는 한 글자의 요일을 나타냄을 확인

 

캡쳐한 그림을 보고 공휴일을 입력한다.

 

ㅜN18셀을 선택 후 홈 - 서식복사를 클릭

 

붓 모양을 확인하고 그 아래 셀 부터 클릭하여 아래로 쭉~ 드래그 한다.

 

적당학 색을 넣는다.

 

C18셀에 수식 =countif($N$18:$N$42,B18) 입력 countif( 범위, 찾는 값) 범위에서 값을 찾아 갯수를 뱉는다.

 

C18셀의 오른쪽 아래  검정 십자 모양에서  더블 클릭~!!!

 

C18셀의 수식을  다음과 같이 수정 =IF(COUNTIF($N$18:$N$42,B18)=1,"공","") 만약 갯수를 세어 1이면 공휴일이므로 공을 출력하고 아니면 ""(빈칸)을 출력한다.

 

공휴일이 출력됨을 달을 바꾸어 가며 확인한다

 

날짜칸을 선택하여 조건부 서식에서 =or(weekday(B18)=1,C18="공") 입력 요일수 1(일요일) 이거나 오른쪽칸에 "공"이면 이제 빨강색을 설정한다.

 

굵게 빨강

 

간격이 좁다 아래 그림 처럼 상단의 열에 검정 마우스 모양에서 더블클릭

 

A18셀 선택하여 조건부서식 - 규칙 관리에서 파랑(토요일)의 범위를 A48을 B48로 수정 빨강의 True일경우 중지를 체크!!!

 

날짜칸을 전체 선택 후 셀서식 (Ctrl +1) - 사용자 지정 d 만 입력 확인, 또 확인

 

날짜만 나타남을 확인 B열의 간격을 조정! 상단 더블클릭!!