[260회 라이브 공지] 이번 주(3/28) 토요일 라이브는 휴강입니다. 즐거운 주말 연휴 보내세요! 오빠두엑셀 `2026 무료 챌린지` 오픈! 완주하고 수료증 받아가세요! 5년 연속 IT분야 베스트셀러! 「 진짜쓰는 실무엑셀 」로 2026년 공부 끝내기 엑셀이 막히셨나요? Q&A 게시판에서 바로 해결하세요.
메뉴
Lecture Live 엑셀 눈 내리는 크리스마스 ...
Live Replay 멤버쉽 라이브 강의

엑셀 눈 내리는 크리스마스 트리 만들기 - VBA 완성 예제

오빠두엑셀
오빠두엑셀 Microsoft MVP · Excel Expert
| 2021년12월25일

강의 소개

1. 눈 내리는 효과 & 아래로 흐르는 조명 만들기

엑셀 눈 내리는 효과_R

이번 강의에서는 간단한 조건부서식을 사용하여 매 초마다 화면이 바뀌며 눈 내리는 효과를 만들어봅니다.

.
엑셀 조건부서식 행 강조_R

이후 특정 조건을 만족할 때 전체 행을 강조하는 조건부 서식을 사용하여 아래로 흐르는 크리스마스 트리 조명을 만들어봅니다.

2. 크리스마스 트리 애니메이션 매크로

엑셀 크리스마스 트리 매크로_R

이번 강의에서는 미리 작성해드린 크리스마스 트리 애니메이션 매크로를 사용하여 화면이 변하는 크리스마스 트리 카드를 제작합니다.

.
엑셀 크리스마스 매크로 완성_R

이후 작성한 매크로를 버튼에 추가하여 버튼을 클릭하면 애니메이션이 실행되고 멈추는 예쁜 크리스마스 트리 애니메이션 카드를 완성합니다.

보충 자료

📑 강의에 사용된 매크로 코드

Option Explicit
 
Public bStart As Boolean
 
Sub HeartChart()
 
Dim i As Long: Dim x As Long
bStart = Not bStart
 
Do
    For i = 시작 To 종료 Step 단계  '<- 시작값, 종료값, 단계를 입력합니다.
        If bStart = True Then
            For x = 1 To 100000000: x = x + 1: Next
            DoEvents
            Range("셀주소").Value = i  '<- 셀 주소를 입력합니다.
        Else
            Exit Sub
        End If
    Next
Loop While bStart = True
 
End Sub
댓글 1
5 (1개 평가)
강민준🤗
강민준🤗 2024.08.12 09:27
좋은 강의 정말 감사합니다🙇‍♂️