데이터 범위설정 매크로 수식

@젬마 님 Sub Set_Range()
Dim rng As Range
With ActiveSheet
Set rng = .Range("C11:J" & .Cells(Rows.Count, "C").End(xlUp).Row)
Set rng = rng.SpecialCells(xlCellTypeVisible)
MsgBox rng.Address
End With
End Sub

@젬마 님 기본적으로 정해진 범위를 지정하는 식은 아래와 같습니다.

Range("C10:J10").Select  이렇게 하면 선택이 됩니다.

C10:L10 까지 선택을 하고 그아래로 데이터가 있는위치까지 선택할려면 아래식을 사용하세요.

Range(Selection, Selection.End(xlDown)).Select

이후에 선택된 데이터를 복사하는 방법입니다.
Selection.Copy

그래서 간단하게 아래 코드를 사용하시면 될거 같습니다.

    Range("C10:J10").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy