Mục lục
Mẫu hiện tại
Macro VBA Word này sẽ hiển thị mẫu hiện tại:
Sub DisplayCurrentTemplate () 'hiển thị đường dẫn đầy đủ của tài liệu hoạt động mẫu MsgBox ActiveDocument.AttachedTemplate.FullName,, "Vị trí mẫu" End Sub
Tạo mẫu mới
Macro VBA Word này sẽ tạo một mẫu mới:
Sub MakeNewTemplate () 'tạo một tài liệu mới và lưu dưới dạng mẫu. Mẫu easyexcel.net template.dotm "Đặt oDoc = Documents.Add 'tạo một tài liệu mới và gán nó vào biến oDoc". Viết một số văn bản trong tài liệu mới cung cấp cho nó bằng cách sử dụng biến oDoc.Range.InsertBefore "Mẫu mẫu" oDoc. Phạm vi. Kết thúc Sub
