저는 포럼과 VBA (Excel 용)를 처음 사용합니다.
아주 간단한 일을하려고합니다.
따라서 ALT + H + I + R을 150 번 입력하지 않기 위해 (그리고 앞으로 동일한 문제가 발생할 가능성도 있기 때문에) VBA를 사용해보고 있습니다.
이것은 지금까지 가지고있는 코드입니다.
Sub InsertRows()
' InsertRows Macro
Dim Var As Integer
Var = 5
Do While Var < 1700
Var = Var + 10
Range("F" & Var).Select
Selection.EntireRow.Insert
Loop
End Sub
내가 가진 문제는 새로운 행이 각 루프에 추가된다는 점을 감안할 때 프로그램이 각 반복마다 한 행씩 "뒤쳐진 다"는 것입니다.
귀하의 의견에 감사드립니다!
고마워! Eliseo
더 가까워 지나요?
Sub InsertRows()
Dim Var As Long
Var = 1700
Do While Var > 10
Var = Var - 10
Range("F" & Var).EntireRow.Insert
Loop
End Sub
원하는 간격을 얻으려면 시작 행으로 변경해야 할 수 있습니다.
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다