Hướng dẫn này sẽ trình bày các phương pháp khác nhau để tạo một sổ làm việc mới bằng VBA.
Tạo sổ làm việc mới
Để tạo một sổ làm việc mới, chỉ cần sử dụng Workbooks.Add:
| 1 | Workbooks.Add |
Workbook mới được thêm vào hiện là ActiveWorkbook.
Bạn có thể thấy điều này bằng cách sử dụng mã này:
| 123456 | Sub AddWB ()Workbooks.AddMsgBox ActiveWorkbook.NameKết thúc Sub |
Tạo Sổ làm việc Mới & Gán cho Đối tượng
Bạn có thể sử dụng đối tượng ActiveWorkbook để tham chiếu đến Workbook mới. Bằng cách sử dụng này, bạn có thể gán Sổ làm việc mới cho một Biến đối tượng:
| 1234 | Làm mờ wb dưới dạng Sổ làm việcWorkbooks.AddĐặt wb = ActiveWorkbook |
Tuy nhiên, tốt hơn / dễ dàng hơn khi gán Sổ làm việc ngay lập tức cho một biến khi Sổ làm việc được tạo:
| 123 | Dim wb As WorkbookĐặt wb = Workbooks.Add |
Bây giờ bạn có thể tham chiếu Workbook mới theo tên biến của nó.
| 1 | MsgBox wb.Name |
Tạo Sổ làm việc Mới & Lưu
Bạn cũng có thể tạo một Sổ làm việc mới và ngay lập tức lưu nó:
| 1 | Workbooks.Add.SaveAs Filename: = "NewWB" |
Thao tác này sẽ lưu Sổ làm việc dưới dạng tệp .xlsx vào thư mục mặc định của bạn (ví dụ: Tài liệu của tôi). Thay vào đó, bạn có thể tùy chỉnh SaveA với hướng dẫn lưu Workbooks của chúng tôi.
Bây giờ bạn có thể tham khảo Workbook theo tên của nó:
| 1 | Workbooks ("NewWB.xlsx"). Kích hoạt |
Mã này sẽ Kích hoạt “NewWB.xlsx”.
Tạo Sổ làm việc Mới & Thêm Trang tính
Sau khi tạo Workbook, bạn có thể chỉnh sửa nó. Đây chỉ là một ví dụ để thêm hai trang tính vào Workbook mới (giả sử đó là ActiveWorkbook):
| 1 | ActiveWorkbook.Worksheets.Add Count: = 2 |
