VBA를 사용하여 통합 문서를 닫으려면 Workbook.Close 메서드를 사용하고 Excel을 종료하려면 Application.Quit 메서드를 사용합니다.
다음은 몇 가지 코드 예제입니다. 활성 통합 문서를 닫고 통합 문서에 변경 사항이 있는 경우 저장할지 여부를 묻는 메시지를 표시합니다.
다음과 같이 코드 코드를 복사합니다.
하위 닫기워크북()
ActiveWorkbook.닫기
서브 끝
프롬프트를 표시하지 않으려면 통합 문서를 직접 저장하고 닫는 등 "SaveChanges" 매개 변수를 추가할 수 있습니다.
다음과 같이 코드 코드를 복사합니다.
하위 ClastAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
서브 끝
저장하지 않고 바로 통합 문서를 닫으려면 위 코드의 "True"를 "False"로 변경하세요.
열려 있는 모든 통합 문서를 닫고 저장할지 묻는 메시지를 표시합니다.
다음과 같이 코드 코드를 복사합니다.
하위 CloseAllWorkbooks()
오류 발생 시 다음 재개
통합 문서.닫기
서브 끝
Excel을 종료하고 변경된 통합 문서를 저장하라는 메시지가 표시됩니다.
다음과 같이 코드 코드를 복사합니다.
SubQuitExcel()
응용 프로그램.종료
서브 끝
활성 통합 문서를 저장하고 Excel을 종료합니다.
다음과 같이 코드 코드를 복사합니다.
하위 저장ActiveWorkAndQuit()
ActiveWorkbook.저장
응용 프로그램.종료
서브 끝
다음 코드는 Excel을 종료할 때 통합 문서를 저장할지 여부를 묻는 메시지를 표시하지 않습니다.
열려 있는 모든 통합 문서를 저장하고 Excel을 종료합니다.
다음과 같이 코드 코드를 복사합니다.
하위 SaveAllAndQuit()
통합 문서의 각 wbk에 대해
wbk.저장
다음
응용 프로그램.종료
서브 끝
변경 사항을 저장하지 않고 Excel을 종료합니다.
다음과 같이 코드 코드를 복사합니다.
SubQutiAndNoAlerts()
Application.DisplayAlerts = 거짓
응용 프로그램.종료
서브 끝
VBA의 몇 가지 일반적인 작업은 다음과 같습니다.
새 통합 문서 열기
다음과 같이 코드 코드를 복사합니다.
통합 문서.추가
첫 번째 통합 문서의 이름 가져오기
다음과 같이 코드 코드를 복사합니다.
통합 문서(1).이름
열려 있는 통합 문서 수를 가져옵니다.
다음과 같이 코드 코드를 복사합니다.
통합 문서.개수
열려 있는 두 번째 통합 문서 활성화
다음과 같이 코드 코드를 복사합니다.
통합 문서(2).활성화
통합 문서 Chap02.xls 활성화
다음과 같이 코드 코드를 복사합니다.
통합 문서("Chap02.xls").활성화
현재 활성화된 통합 문서는 NewChap.xls로 저장됩니다.
다음과 같이 코드 코드를 복사합니다.
ActiveWorkbook.SaveAs 파일 이름:="NewChap.xls"
첫 번째 통합 문서 닫기
다음과 같이 코드 코드를 복사합니다.
통합 문서(1).닫기
변경 내용을 저장하지 않고 현재 활성 통합 문서를 닫습니다.
다음과 같이 코드 코드를 복사합니다.
ActiveWorkbook.Close SaveChanges:=False
열려 있는 모든 통합 문서를 닫습니다.
다음과 같이 코드 코드를 복사합니다.
통합 문서.닫기
마지막 예제를 실행했다면 이제 모든 통합 문서가 닫혀 있습니다.
워크시트에서 사용하기 전에 새 통합 문서를 열어야 합니다.
단일 워크시트를 추가하는 경우 통합 문서에 새 워크시트를 추가하는 방법, 워크시트 또는 워크시트 그룹을 선택하는 방법, 워크시트 이름 지정, 복사, 이동 및 삭제 방법을 알아야 합니다.
VB에서는 각 작업에 특수한 메서드나 속성이 필요합니다.
새 워크시트 추가
다음과 같이 코드 코드를 복사합니다.
워크시트.추가
첫 번째 워크시트의 이름을 가져옵니다.
다음과 같이 코드 코드를 복사합니다.
워크시트(1).이름
"Sheet3"이라는 워크시트를 선택합니다.
다음과 같이 코드 코드를 복사합니다.
워크시트(3).선택
첫 번째, 세 번째, 네 번째 워크시트를 선택합니다.
다음과 같이 코드를 복사합니다: Worksheets(Array(1,3,4)).Select
"Sheet1"이라는 워크시트를 활성화합니다.
다음과 같이 코드 코드를 복사합니다.
워크시트("시트1").활성화
시트 "Sheet1" 앞으로 시트 "Sheet2" 이동
다음과 같이 코드 코드를 복사합니다.
Worksheets("Sheet2").앞으로 이동:=Worksheets("Sheet1")
워크시트 "Sheet2"의 이름을 "비용"으로 바꿉니다.
다음과 같이 코드 코드를 복사합니다.
Worksheets("Sheet2").Name = "비용"
현재 통합 문서의 워크시트 수를 가져옵니다.
다음과 같이 코드 코드를 복사합니다.
워크시트.개수
현재 통합 문서에서 "비용" 워크시트를 삭제합니다.
다음과 같이 코드 코드를 복사합니다.
워크시트("비용").삭제