이 Excel 매크로를 반복 하시겠습니까?

아래 코드를 가지고 있으며 기본적으로 R16에서 R200까지 그리고 Range("G16").Select에서 G200 사이의 전체 셀 범위를 만들 수 있기를 원합니다.이 Excel 매크로를 반복 하시겠습니까?

즉 그것은 R17은 다음 G16 17, R18 다음 G18 등

그래서 전체 기능, G3에 R3 및 G2-R2 변경 실행을 다시 시작하고 R3R4에 변경 G3에 G4됩니다로 변경하는 경우 등

Sub Search() 

Range("H2").Select 
ActiveCell.FormulaR1C1 = "=IF(ISNUMBER(SEARCH(R16C6,RC[4])),RC[2],"""")" ' Edit RXX value 
Range("H2").Select 
Selection.AutoFill Destination:=Range("H2:H385") 
Range("H2:H385").Select 
Range("G16").Select ' Edit GXX value 
ActiveCell.FormulaR1C1 = "=SpecialConcatenate(C[1])" 
Range("G11").Select 
Application.Run "Test.xlsm!CopyPaste" 
Range("H2").Select 

End Sub

출처

2010-07-01 Tom

Sub Search2() 

    With Range("h2:h385") 
     .FormulaR1C1 = "=IF(ISNUMBER(SEARCH(R[14]C6,RC[4])),RC[2],"""")" 
    End With 

    Range("G16").FormulaR1C1 = "=SpecialConcatenate(C[1])" 
    Application.Run "Test.xlsm!CopyPaste" 

End Sub

당신은 괄호의 R 번호를 넣어 경우, 그것은 ㅁ하는 것을 기준으로한다 atever 셀에 들어 있습니다. 그래서 R [14]는 행 2에있을 때 행 16을 가리키고 행 200에있을 때 행 214를 가리 킵니다.

출처

2010-07-01 18:21:00

응답에 대해 감사드립니다. :) - 이것은 또한 G의 범위를 증가 시키는가? 즉 h2에서 h3으로 변화하고, G는 g2에서 g3으로 변화한다. 반복 [h4, g4,/h5, g6 등] – Tom

예. R [14] C6은 열 G에서 14 행 아래로 이동한다는 의미입니다. C6는 현재 열에 관계없이 항상 괄호를 사용하지 않으므로 G 열을 가리 킵니다. R [14]는 행이 변경 될 때 변경됩니다. RC [4]는 같은 줄에 머무르고 오른쪽으로 4 칸 이동하는 것을 의미합니다. 이 행과 열은 활성 셀을 기준으로합니다. –

이 Excel 매크로를 반복 하시겠습니까?

답변

관련 문제