A. 현재 사용중인 시트 외 모든 시트 삭제
작성자 정보
-
모아 작성
- 작성일
컨텐츠 정보
- 4 조회
- 0 추천
- 0 비추천
- 목록
본문
A. 현재 사용중인 시트 외 모든 시트 삭제
Sub DeleteWorksheets()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.name <> ThisWorkbook.ActiveSheet.name Then
Application.DisplayAlerts = False
Application.DisplayAlerts = True
End If
Next ws
End Sub
[출처] [엑셀 팁] 엑셀로 사용하는 특수한 매크로 2편|작성자 shake_luna
|
|
포인트 선물 선물명단 선물하기
최소 5P ~ 최대 100000000P 까지 가능합니다.
로그인 후 선물하실 수 있습니다.
선물 받은 내용이 없습니다.
관련자료
모아
ex.9
-
등록일 05:56
-
등록일 05:56
-
등록일 05:56
-
등록일 05:55
댓글 0
등록된 댓글이 없습니다.