A2 값에 따라 특정 행 수의 매크로를 테이블에 추가하려고합니다. 예를 들어셀 값을 기준으로 테이블에 행 삽입
: 나는 매크로를 실행할 때
이A2 = 10 경우는 10 행을 삽입해야한다.
또한 매크로의 두 번째 부분으로 이전 셀의 공식을 복사하고 싶습니다.
예 : 나는 10 개 행을 추가하는 경우
A3= "='Sheet2'!A1"
하고 다음 행을 순차적한다 : 등
A4= "='Sheet2'!A1"
A5= "='Sheet2'!A2"
A6= "='Sheet2'!A3"
A7= "='Sheet2'!A4"
A8= "='Sheet2'!A5"
...
내가 아는 그의 전형적인 드래그 테이블이 셀을 복사 할 것이므로 수식이 다음 행으로 복사되도록하고 싶습니다.
그러면 A3에 표시된 공식을 복사하여 A2에 입력 한 숫자만큼 붙여 넣습니다.
ActiveWorkbook.Sheets(1).Cells.Range("A4:A" & Rows.Count).ClearContents
For i = 1 To ActiveWorkbook.Sheets(1).Cells(2, 1).Value
ActiveWorkbook.Sheets(1).Cells(3 + i, 1).Formula = ActiveWorkbook.Sheets(1).Cells(3, 1).FormulaR1C1
Next i
이 정보는 찾고 계신 정보입니다.
매력처럼 작동합니다! 나는 이차적 인 질문을 가지고있다. 범위 선택 수식에 "i"를 사용할 수 있습니까? 내가 할 수 있기를 바란 것은 이전에 있었던 세포의 내용물을 깨끗하게하는 것이다. 그래서 전에 10 개의 세포가 있고 지금 8 개가 있다면, 여분의 2 개가 없어지 겠지 ... 그것이 의미가 있기를 바란다. – user1664305
@ user1664305 내 대답을 업데이트하고 내 새로운 답변을 편집 할 때 ClearContents를 사용하십시오. 엄지 손가락을 포기하는 것을 잊지 마세요! – CodeCamper
그래서 ** 10 ** 행을 삽입하고 싶지만 ** 5 ** 수식 만 삽입 하시겠습니까? – Jeeped