[VBA 엑셀매크로] 시트 생성 .Copy .Count /시트이름변경 .Name /시트선택 .Select/시트삭제 .Delete

Sub 매크로()

 ActiveSheet.Copy After:=Worksheets(Worksheets.Count)
 '원본시트 (2) 생김
 Worksheets(Worksheets.Count).Name = "원하는시트이름"
 '원본시트 (2) 이름이 [원하는시트이름] 으로 변경
 Sheets("원하는시트이름").Select
 '[원하는시트이름] 시트 선택하기
 Sheets("원하는시트이름").Delete
 '[원하는시트이름] 시트 삭제하기        
 
 End Sub