Trong ví dụ của chúng tôi, chúng tôi muốn bắt đầu một phiên Word mới và mở một tài liệu cụ thể. Tài liệu sau đó có thể được chỉnh sửa. Word được gọi bằng cách sử dụng các lệnh từ thư viện VBA đã tích hợp trước đó.
Sử dụng lệnh “Tạo đối tượng” để tạo phiên Word từ ứng dụng Excel. Bằng cách chuyển tham số "Word.Application", bạn bắt đầu một phiên Word mới từ bên trong Excel. Đây là mã hoàn chỉnh:
Sub StartWord ()
Dim objWordApp làm đối tượng
Dim strPath dưới dạng chuỗi
strPfad = "C: \ Document.docx"
Đặt objWordApp = _ CreateObject ("Word.application")
Với objWordApp
.Application.VABLE = True
.Application.Documents.Open (strPath)
'Đây là lệnh của bạn
Kết thúc với
Đặt objWordApp = Không có gì
Kết thúc Sub
Chương trình mở một phiên Word và tải tài liệu "C: \ Document.docx". Bạn sẽ nhận được thông báo lỗi nếu tài liệu không tồn tại ở vị trí này. Từ vị trí “Các lệnh của bạn ở đây”, hãy chèn các lệnh mà tài liệu Word được thay đổi. Vui lòng lưu ý lệnh ở cuối chương trình con:
Đặt objWordApp = Không có gì
Thao tác này đóng kết nối từ Excel sang Word thông qua biến đối tượng "objWordApp". Đây là điều quan trọng để đạt được một kết thúc rõ ràng của chương trình.
