Excel 매크로 - 삽입 된 행 계산

한 시트에서 다른 시트로 데이터를 복사하는 중이고 범용 카운터 x가 있습니다.Excel 매크로 - 삽입 된 행 계산

x = 2 
    Sheets("Info").Select 
    Range("B2:B6").Copy Destination:=Sheets("GreatIdea").Range("A" & x) 
    x = x + 1

그래서 5 행을 삽입하고 다음 필드에 데이터를 가져옵니다. A2, A3, A4, A5, A6.

x is currently 3 
    Sheets("Info").Select 
    Range("B10").Copy Destination:=Sheets("GreatIdea").Range("A" & x)

이제 1 행이 삽입되지만 셀 A3은 데이터를 덮어 씁니다. 앞의 복사본에 추가 된 필드의 수와 함께 'x'를 어떻게 추가 할 수 있습니까? 그래서 'x'는 7이 될까요?

감사합니다.

2011-03-16 CustomX

당신은 놀랍도록했다 Rows.Count

x = x + Range("B2:B6").Rows.Count

2011-03-16 20:10:27 Dave

을 사용할 수 있습니다! – CustomX

거기에 방법을 확장 할 수 있습니다 B2 : B5 데이터가 들어 있지만 B6 비어 있습니다, 나는 그것을 카운트에서 B6 사용할 싶지 않아요. 이것이 가능한가? – CustomX

흠 ... 나는 그것을 할 일선을 생각할 수 없다. 그러나 그것은 분리 된 기능으로 가능할 것이다. 'for each'루프를 사용하고 vbNullString을 확인하십시오. – Dave

답변