모든 행이 아닌 2 번 행에서 선택을 시작하는 방법은 무엇입니까?

Question

행 2에서만 시작하도록 선택 사항을 제한하려면 어떻게 수정해야합니까? 현재 모든 행을 선택합니다.

Answer 1

작동 시키려면 셀 D2에 데이터가 있는지 확인해야합니다. 이 예제를 참조하십시오.

Sub Sample() 
    Dim myRng As Range 
    Dim ws As Worksheet 
    Dim Lrow As Long 

    '~~> Change this to the relevant worksheet 
    Set ws = ThisWorkbook.Sheets("Sheet1") 

    With ws 
     '~~> Get last row which has data in Col D 
     Lrow = .Range("D" & .Rows.Count).End(xlUp).row 

     If Not Lrow < 2 Then 
      Set myRng = .Range("D2:D" & Lrow) 
      MsgBox myRng.Address 
     Else 
      MsgBox "There is no data in cell D2" 
     End If 
    End With 
End Sub