[엑셀 VBA] 엑사남 2강 #반복문

 

[엑셀 VBA] 엑사남 2강 #반복문

늦은 퇴근시간을 앞당기기 위해

공부합니다^^

몇번을 도전하다 실패한 엑셀VBA를

이번에는 초급을 넘어서보려고 합니다.

 

#학습내용(1)

Sub GuGu_number()

    Dim i As Long

    For i = 1 To 9

 

        For j = 1 To 9

        Cells(i, j) = i * j

        Next

    Next

End Sub

 

#학습내용(2)

Sub shape_color()

    Dim sh As Object
    Dim lngC As Long

    For Each sh In ActiveSheet.Shapes

        lngC = lngC + 1
        sh.Left = Range("B1").Left

        sh.Fill.ForeColor.SchemeColor = lngC

    Next

End Sub

 

두번째는

#구구단

#도형이동, 색상변경

이었습니다.

 

출처 : https://youtu.be/1ueDvcQBXzE