VBA Excel : 범위 개체의 일부 가져 오기

Question

범위가 1339 개의 셀이있는 열 벡터 모양 인 myRng입니다.

Dim cell As Range 
For each cell in myRng(1:100) 
    'Do something 
Next cell 

작업이 작업을 얻을 수 myRng(1:100)에 대한 적절한 선택 기능 :

나는 myRng의 첫 번째 100 셀을 선택하고 For each 작업을 수행 하시겠습니까?

Answer 1

Range 속성은 시작과 끝 셀을 허용하여이를 제한 할 수 있습니다. 귀하의 경우에는

이처럼 작성합니다

For Each cell In myRng.Range(myRng(1), myRng(100)) 
    ' Do something 
Next 

Answer 2

을 myRng는 단일 열 경우, ssarabando 년대 작동합니다. 좀 더 일반적인 방법으로 myRng에 차원이 둘 이상있는 경우 Offset과 Resize를 결합하거나 명시 적으로 열을 선언하는 것입니다. 예 :

Sub foo() 
    Dim rg As Range 
    Set rg = Range("a1:b1000") 
    Debug.Print Range(rg(1), rg(100)).Address '-->$A$1:$B$50 
    Debug.Print rg.Columns(1).Resize(rowsize:=100).Address '$A$1:$A$100 
    Debug.Print rg.Columns(2).Resize(rowsize:=100).Address '$B$1:$B$100 

    Debug.Print rg(, 1).Resize(rowsize:=100).Address '$A$1:$A$100 
    Debug.Print rg(, 2).Resize(rowsize:=100).Address '$B$1:$B$100 
End Sub