|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007) : 2017
* 아래줄에 질문을 작성하세요 >>
각 시트 중 조건외의 시트는 삭제하는 VBA를 만들고자 합니다.
조건 :
1. 각 시트를 순환하면서 A1셀의 data가 "제출시트"로 되어 있고,
2-1. A2셀의 data가 "덕트산출서-1"이면 A3셀에 해당시트이름을 입력하고,
2-2. A2셀의 data가 "덕트산출서-2"이면 A3셀에 해당시트이름을 입력하고,
2-3. A2셀의 data가 "배관산출서-1"이면 A3셀에 해당시트이름을 입력하고,
2-4. A2셀의 data가 "배관산출서-2"이면 A3셀에 해당시트이름을 입력하고,
3. 그 외의 나머지 모든 시트는 삭제
짧은 지식으로 혼자 고민하다가 도움을 얻고자 합니다.
==============[스르르님 글에 대한 답변입니다]==============
코드를 조금 수정하였습니다.
참고하시기 바랍니다. |
|