엑셀 vba 셀선택 end(xlup), end(xltoRight)

Sub 셀선택_코드_end속성() '방법1)         'A열의 가장 마지막 입력된 셀로 이동     Range("a1").End(xlDown).Select              '키보드의 다음과 같은 결과임         'A1에 위치한 상태에서         '키보드 end키 클릭 후         '키보드 방향키 ↓ 클릭과 같은 결과      '방법2)         '데이터가 끊겨 있는 경우(B열)         'B열의 가장 마지막 입력된 셀로 이동     Cells(Rows.Count, "b").End(xlUp).Select     '      행번호, 열번호   다시돌아옴                  'B열의 마지막으로 내려갔다가 다시         'End(xlup)로 올라오는 코드      '방법3)위의 내용을 풀어 쓰면 다음과 같다.     Cells(Rows.Count, "b").Select     ActiveCell.End(xlUp).Select         '액티브셀은 현재 위치한 셀을 말함         's가 붙지 않음에 유의함      '방법4)          '오른쪽으로 이동     Range("a10").End(xlToRight).Select                     'To가 붙음      '방법5)         '데이터가 끊겨 있는 경우(10행)         '10행의 가장 마지막 입력된 셀로 이동     Cells(10, Columns.Count).End(xlToLeft).Select     '     행번호, 열번호      다시 돌아옴        '방법6) 위의 내용을 풀어 쓰면 다음과 같다.     Cells(10, Columns.Count).Select     ActiveCell.End(xlToLeft).Select End Sub