본문으로 바로가기

VBA 별 찍기 예제

category Excel VBA/VBA 예제 2015.09.06 13:29

VBA 별 찍기 예제



별 찍는 알고리즘은 실제 업무에서 쓸일이 없어보이긴 하지만 


제어문을 배우는 괜찮은 방법중 하나인 것 같다.


위와 같은 별을 엑셀로 찍어볼 것이다.


소소코드는 매우 간단한다.


Sub printStar()

    

    number_of_stars = 10

    

    For i = 1 To number_of_stars

        For j = 1 To i

            Range("a" & i).Value = Range("a" & i).Value + "*"

        Next

    Next

    

End Sub




end.








댓글을 달아 주세요

  1. 2017.11.22 16:00

    비밀댓글입니다