위에서 아래로 채워주는 VBA

엑셀 VBA는 프로그래밍 언어인지 매크로인지 잘 모르겠지만, 강력하긴 하다.

Sub copyandpast()

i = 5

Do While i < 400
For j = 2 To 23

If Cells(i, j).Value = “” Then

Cells(i, j).Value = Cells(i – 1, j).Value

End If

Next j

i = i + 1

Loop

End Sub

이 코드는 다음줄이 빈칸이면 그 윗줄에서 찾아다가 채워주는 코드이다. 즉, 파일이 빈칸없이 채워진다.

실제 사용시에는 저기 5, 400, 2, 23과 같은 숫자들을 고쳐서 쓰면 된다.

Proudly powered by WordPress | Theme: Baskerville 2 by Anders Noren.

Up ↑