Excel - 범위를 설정하고 자동 완성하는 매크로입니다.

발행물

Excel 용 매크로를 기록했으며 코드의 일부는 B 열의 데이터를 기반으로 행 수 (즉, A2 = 1, A3 = 2 등)로 셀을 채우는 인덱스 열을 만드는 것입니다.

• 매크로가 완벽하게 기록되고 작동하지만 다른 파일에서이 파일을 사용하려고하면 매크로에 문제가 발생합니다. 각 파일에는 채울 채우기 행 수가 동일하지 않기 때문입니다.
• 얼마나 많은 행의 데이터가 있더라도 열 수있는 Excel 파일에 맞게 아래 코드를 수정하려면 어떻게해야합니까?

 ActiveCell.FormulaR1C1 = "Index"열 ( "B : B")을 선택합니다. Selection.Copy를 선택합니다. ( "A : A" 선택 항목을 선택하십시오 .PasteSpecial 붙여 넣기 : = xlPasteFormats, 작업 : = xlNone, _ SkipBlanks : = False, Transpose : = False Application.CutCopyMode = False Range ( "A2") 선택 ActiveCell.FormulaR1C1 = ActiveCell.FormulaR1C1 = "2"범위 ( "A2 : A3") 선택 Selection.AutoFill 대상 : = 범위 ( "A2 : A295324") 범위 ( "A2 : A295324") "1"범위 ( "A3" .고르다 

해결책

다음 코드를 사용해보십시오.

 값 = "인덱스"범위 ( "A"). 값 = 1 범위 ( "A" = "Range :"A2 : A3 "). 값 = 2 범위 ("A2 : A3 ") : 범위 ("B "& Rows.Count). 끝 (xlUp). lRow) End Sub 

이 팁에 대한 TrowaD에게 감사드립니다.