data

엑셀/매크로로 셀에 있는 데이터를 지우자

멍게: 2018. 8. 31. 19:33

엑셀/ 입력된 셀 값을 비워주는 매크로 식


'(입력)정리시트' 표에 데이터를 입력하고 매크로를 실행하여 입력했던 데이터를 지워보자.

🔎'삭제'라는 이름의 매크로 생성

C3:H3에 입력된 값을 지워주는 코드는 아래와 같다.

1
2
3
4
5
Sub 삭제()
    Range("C3:H3").Select
    Selection.ClearContents
    Range("C3").Select
End Sub
cs


 '삭제'매크로를 실행하면 입력한 데이터를 지워준다.

하지만, 내가 원하는 건 데이터 작성하고나서 '입력'버튼 누르면 다음 시트에 그 데이터가 추가되고 지금 시트에서 작성했던 데이터는 비워지길 원함!

그래서 '삭제'매크로를 이전 게시글의 '입력' 매크로와 합쳐서, 아래와 같이 코드를 적는다.


🔎'입력'매크로에 셀비우기 매크로를 합친 코드

1
2
3
4
5
6
7
8
9
Sub 입력()
Dim rng As Range
Set rng = Sheets("정리시트").Cells(Rows.Count, "B").End(3)(2)
rng.Resize(, 7= Range("b3:h3").Value
    
    Range("C3:H3").Select
    Selection.ClearContents
    Range("C3").Select
End Sub
cs

데이터 쓰고 '입력'매크로 걸어놓은 '입력'버튼 누르면 아래와 같이 데이터는 비워진다. 땨란~




728x90
반응형