[VBA] AutoFill 범위에 변수 넣기

내용

AutoFill의 경우 셀의 행값이 유동적인 경우가 있어서 여러 시트를 작업할때는 변수로 채워줘야한다.

1개의 열을 autofill할때랑 여러개의 열을 autofill 할때 다르게 작업해줘야한다... 삽질 매드무비의 결과다..

 

코드

Sub 매크로1()
'
' 매크로1 매크로
'
' 바로 가기 키: Ctrl+q
'


    Dim ws As Worksheet
    Dim lastRow As Long

    ' 시트 지정
    Set ws = ThisWorkbook.Sheets("모듈명") ' "Sheet1"을 사용하는 시트 이름으로 변경

    ' 열 A에서 데이터가 있는 마지막 행 찾기
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    

    Range("B2:N2").Select
'    Selection.AutoFill Destination:=Range("B3:N" & lastRow)
     Selection.AutoFill Destination:=Range(Cells(2, 2), Cells(lastRow, 14))
End Sub

 

검색했을때 "B3:N" & LastRow 이렇게 하라는 내용만 있었는데, 같은 열일때는 저렇게 해도 되지만 다른열까지 채울때는 안된다.. 그냥좀 해주지 안해준다..