나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 허석원 (drywell)

추천:  2
파일:     행삭제좀.xls (28.5KB) 조회:  2798
제목:   vba 코드(자동필터된 행삭제시 머리글제외) 수정좀
　 　 　
　 자동필터로 했을때 특정단어가 삽입된 행을 삭제할때
머리글이 지워지네요.
머리글은 안지워지는 방법좀.
첨부한 화일의 코드만 좀 수정해주세요 		　
[불량 게시물 신고]  
놀란토끼안녕하세요?

Sub 지워버려()
  Sheets("Sheet2").Select
  Columns("A:G").AutoFilter Field:=2, Criteria1:="품목계"
  Rows("2:100").Delete
  ActiveSheet.ShowAllData
End Sub

필터링되어 숨겨진 영역은 삭제에 영향을 안미치는걸로 알고 있습니다. 따라서
Rows("2:100").Delete 처럼 2행부터 100행까지 지운다고 적어버리시면.....		08-25 (19:59)
ⓧ삭제 ■신고
 　  　  　
  

작성일 : 2003-08-25(17:53)
최종수정일 : 2003-08-25(17:53)