Phương pháp Đóng và Mở trong Excel VBA có thể được sử dụng để đóng và mở sổ làm việc. Hãy nhớ rằng bộ sưu tập Workbooks chứa tất cả các đối tượng Workbook hiện đang mở.

Đặt một nút lệnh trên trang tính của bạn và thêm các dòng mã sau:

  1. Dòng mã dưới đây đóng close-open.xlsm.

Workbooks("close-open.xlsm").Close

  1. Dòng mã bên dưới đóng sổ làm việc được mở / tạo đầu tiên.

Workbooks(1).Close

  1. Dòng mã bên dưới đóng sổ làm việc đang hoạt động.

ActiveWorkbook.Close

  1. Dòng mã dưới đây đóng tất cả các sổ làm việc hiện đang mở.

Workbooks.Close

  1. Dòng mã bên dưới mở ra sales.xlsx.

Workbooks.Open ("sales.xlsx")

Lưu ý: bạn chỉ có thể mở sales.xlsx mà không chỉ định đường dẫn của tệp nếu nó được lưu trữ ở vị trí tệp mặc định của bạn. Để thay đổi vị trí tệp mặc định, trên tab Tệp, bấm vào Tùy chọn, Lưu.

  1. Bạn cũng có thể sử dụng phương thức GetOpenFilename của đối tượng Ứng dụng để hiển thị hộp thoại Mở tiêu chuẩn.

Dim MyFile As String

MyFile = Application.GetOpenFilename()

  1. Chọn một tệp và nhấp vào Mở.

GetOpenFilename Method

Lưu ý: GetOpenFilename không thực sự mở tệp.

  1. Tiếp theo, bạn có thể mở sổ làm việc như bình thường.

Workbooks.Open (MyFile)