셀선택 프로시저인데 뭐가 잘못된거죠???

VBA
작성자
이하늘
작성일
2021-01-22 09:16
조회
54

 

Sub 선택1()
 
With Range("a1").CurrentRegion.Offset(2).Resize(Rows.Count - 2).Select
 
End With
 
End Sub

 

위와 같이 코드 실행하니 아래 그림처럼 나오네요.

아래와 같이 선택이 되게 하려면 어디를 수정해야 할까요?

이 코드는 아무반응도 없네요.  이코드 봐주세요.

Sub 선택()
Dim rdata As Range
 
Set rdata = Range("a1").CurrentRegion
Set rdata = rdata.Offset(2).Resize(rdata.Rows.Count - 2)
 
 
End Sub

 

전체 3

  • 2021-01-23 14:01
    채택된 답변

    아래 프로시저를 확인해보세요.

    일번은 Range 지정이 되지 않아서 오류가 발생한것이고.

    이번은 Set 뒤에 Select 가 오는것이 아니고 그다음에 오는 것입니다.

    Set 다은에 Select 를 선언 하시면 됩니다.

    일번과 이번의 실행결과는 같습니다.

     

    Sub 일번선택()
    With Range("a1").CurrentRegion.Offset(2).Resize(Range("a1").CurrentRegion.Rows.Count - 2).Select
    
    End With
    
    End Sub
    
    
    Sub 이번선택()
    
     Dim rdata As Range
      
     Set rdata = Range("a3").CurrentRegion
     Set rdata = rdata.Offset(2).Resize(rdata.Rows.Count - 2)
    rdata.Select
    
    End Sub

     


  • 2021-01-22 16:05
    Sub 선택1()

    With Range("a1").CurrentRegion.Offset(2).Resize(Range("a1").CurrentRegion.Rows.Count - 2).Select

    End With

    End Sub

    위와 같이 변경해보세요~


전체 2,488
번호 카테고리 제목 작성자 작성일 추천 조회
2479 VBA
New VBA 질문
M5 | 02:57 | 추천 0 | 조회 7
M5 02:57 0 7
2478 기능/도구
New DuTool 설치시 오류 문의드립니다.
반짝반짝 | 2021.03.04 | 추천 0 | 조회 6
반짝반짝 2021.03.04 0 6
2477 VBA
New 네이버부동산 크롤링
웃음 | 2021.03.04 | 추천 0 | 조회 9
웃음 2021.03.04 0 9
2476 함수/공식
New small함수로 작은수를 찾은 뒤 그에 상응하는 옆셀 불러오기 질문합니다. 첨부파일 (1)
솔솔 | 2021.03.04 | 추천 0 | 조회 15
솔솔 2021.03.04 0 15
2475 함수/공식
New 조건이 있는 중복된 값들의 개수 셀수 있을까요? (1)
dasdas | 2021.03.04 | 추천 1 | 조회 20
dasdas 2021.03.04 1 20
2474 VBA
New 같은이름 다른파일의 데이터 복사 붙이기 첨부파일
H.B | 2021.03.04 | 추천 1 | 조회 20
H.B 2021.03.04 1 20
2473 파워쿼리/피벗
New 파워쿼리 편집기 날짜 및 시간 (10진수) 2 첨부파일 (1)
JaeChoi | 2021.03.04 | 추천 0 | 조회 23
JaeChoi 2021.03.04 0 23
2472 함수/공식
New 9.4512E+15 식으로 발생되는 건들에 대하여 어떻게 하면 정상적으로 숫자가 나올까요? (3)
mo**** | 2021.03.04 | 추천 0 | 조회 32
mo**** 2021.03.04 0 32
2471 함수/공식
New 중복된걸 제외하고 셀수 있는 방법이 있어까요? (2)
dasdas | 2021.03.04 | 추천 0 | 조회 34
dasdas 2021.03.04 0 34
2470 VBA
New 에러가 생기면 코드 실행을 멈추고 싶은데 어떡하면 좋을까요? (1)
cyi | 2021.03.04 | 추천 0 | 조회 17
cyi 2021.03.04 0 17
2469 문서서식
New 엑셀 표를 PPT로 불러왔을때 선 굵기 관련 건 (1)
운영자동차 | 2021.03.04 | 추천 0 | 조회 22
운영자동차 2021.03.04 0 22
2468 VBA
New 아웃룩 첨부파일 저장 시 파일제목 (1)
KDHkm | 2021.03.04 | 추천 0 | 조회 11
KDHkm 2021.03.04 0 11
2467 VBA
New 혹시 2007에서 2010과 같은 스크린샷 vba는 없나여? (1)
손님 | 2021.03.04 | 추천 0 | 조회 16
손님 2021.03.04 0 16
2466 함수/공식
New 두가지 DATA를 비교하여 없는 값 불러오기 첨부파일
Jeff | 2021.03.04 | 추천 0 | 조회 29
Jeff 2021.03.04 0 29
2465 차트/그래프
New 간트에서 선행업무와 연결하는 방법 (1)
라이언 | 2021.03.04 | 추천 0 | 조회 18
라이언 2021.03.04 0 18
2464 함수/공식
New xFilter 함수 기능 설치 (1)
서강국 Noah | 2021.03.04 | 추천 0 | 조회 15
서강국 Noah 2021.03.04 0 15
2463 VBA
New [VBA] 고유값을 순번이 아닌 특정한 값으로 사용하는 방법이 궁금합니다. (1)
u*** | 2021.03.04 | 추천 0 | 조회 14
u*** 2021.03.04 0 14
2462 문서서식
New 출퇴근명부만들기_요일에 색깔넣기 오류_질문입니다. 첨부파일 (4)
반짝반짝 | 2021.03.04 | 추천 0 | 조회 31
반짝반짝 2021.03.04 0 31
2461 함수/공식
New 하이퍼링크로 셀 이동하기 관련 질문.
푸른나래 | 2021.03.03 | 추천 0 | 조회 25
푸른나래 2021.03.03 0 25
2460 기능/도구
New 같은 파일 같은 시트에 있는 많은 데이터를 10개 씩 묶어서 저장하는 방법이 있나요? (1)
이경호 | 2021.03.03 | 추천 0 | 조회 14
이경호 2021.03.03 0 14
2459 대시보드
New 대시보드 인쇄문제 (1)
skyblue**** | 2021.03.03 | 추천 0 | 조회 17
skyblue**** 2021.03.03 0 17
2458 기능/도구
New 직원들간 업무 공유가 가능한가요? (4) 답변완료
건평 | 2021.03.03 | 추천 0 | 조회 39
건평 2021.03.03 0 39
2457 파워쿼리/피벗
New 쿼리,피벗 기본 서식을 변경할 수 있나요? (1)
Kampi Krein | 2021.03.03 | 추천 0 | 조회 23
Kampi Krein 2021.03.03 0 23
2456 피벗테이블
New 엑셀 정리 관련 질문 첨부파일 (1)
hashm**** | 2021.03.03 | 추천 0 | 조회 37
hashm**** 2021.03.03 0 37
2455 함수/공식
New [수식] 간단한 수식관련 질문인데요. (1) 답변완료
가람 | 2021.03.03 | 추천 0 | 조회 38
가람 2021.03.03 0 38
2454 함수/공식
New 자동으로 범위를 지정하여 합계 구하는 공식 첨부파일 (1)
벗님들 | 2021.03.03 | 추천 0 | 조회 33
벗님들 2021.03.03 0 33
2453 함수/공식
New [정말 급합니다 ㅠㅠ] 리스트 클릭 시 상세 내역이 보였으면 합니다. 첨부파일 (2) 답변완료
박이안 | 2021.03.03 | 추천 1 | 조회 70
박이안 2021.03.03 1 70
2452 함수/공식
New 월별 입출고 누적 수량 문의 첨부파일 (2)
excel009 | 2021.03.03 | 추천 0 | 조회 39
excel009 2021.03.03 0 39
2451 함수/공식
New 월별 입출고 누적 수량 문의 첨부파일 (2) 답변완료
excel009 | 2021.03.03 | 추천 0 | 조회 52
excel009 2021.03.03 0 52
2450 함수/공식
New SUMPRODUCT/OFFSET 관련 문제 첨부파일 (2)
슬리드 | 2021.03.03 | 추천 0 | 조회 42
슬리드 2021.03.03 0 42