[엑셀 VBA] 엑사남 6강 #셀을 변수로 사용

[엑셀 VBA] 엑사남 6강 #셀을 변수로 사용

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

공부합니다^^

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

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

 

#학습내용(1)

Sub test01()

    Dim i As Long
    
    For i = 9 To Range("B2")
    
        If Range("G" & i) = Range("B3") And _
            Range("H" & i) <= Range("B4") Then
            
            Range("B5").Copy
            Range("F" & i).Resize(1, 3).PasteSpecial xlFormats
        
        End If
        
    Next i
    
End Sub

#학습내용(2)

Sub test02()

    Dim i As Long
    
    With Range("F8").CurrentRegion
        .Interior.ColorIndex = 0
        .Font.ColorIndex = 0
    End With
    
    
    For i = 9 To Range("B2")
    
        If Range("G" & i) = Range("B3") And _
            Range("H" & i) <= Range("B4") Then
            
            Range("B5").Copy
            Range("F" & i).Resize(1, 3).PasteSpecial xlFormats
        
        End If
        
    Next i
    
End Sub

 

 

 

출처 : https://youtu.be/KjsMiokI3GM