Làm cách nào để tạo hộp nhập và hộp thư trong tài liệu Word với VBA?

Cập nhật lần cuối: Tháng 7 năm 2020; Khả năng áp dụng: Office 365,2019, 2016, 2013.

Đôi khi, chúng tôi muốn làm cho các tài liệu Word của mình trở nên tương tác hơn và thậm chí nắm bắt được một số thông tin nhập của người dùng. Nhập các hộp tin nhắn và đầu vào.

Như tên cho thấy hộp thông báo là một phần thông tin được hiển thị cho người dùng tài liệu. Hộp nhập liệu là công cụ để nắm bắt thông tin từ người dùng.

Bài đăng này có tất cả thông tin và mẫu mã bạn sẽ cần để tạo tài liệu đầy đủ chức năng với hộp nhập thông báo và hộp nhập liệu Visual Basic for Applications (VBA) cho Microsoft Word.

Làm cách nào để thêm mã VBA vào Word?

Trước khi chúng tôi tiếp tục và giải thích cách thêm hộp thông báo và đầu vào, đây là phần bổ sung nhanh về cách thêm mã VBA tùy chỉnh của bạn vào tài liệu Word.

• Trước hết, hãy tiếp tục và bật tab Nhà phát triển .
• Bây giờ, nhấn nút  Visual Basic từ  tab Nhà phát triển  . Thao tác này sẽ mở Trình soạn thảo Visual Basic.

• Làm nổi bật Tài liệu của bạn.
• Bấm  Chèn  và sau đó chọn  Mô-đun .

• Sao chép mã chúng tôi cung cấp bên dưới vào Mô-đun bạn vừa tạo vào mô-đun của mình.
• Nhấp vào Lưu. Cung cấp tên cho tài liệu của bạn nếu được nhắc.
• Đóng Trình soạn thảo Visual Basic.

Hộp thư Mã VBA

Cú pháp:

MsgBox (lời nhắc, nút, tiêu đề, tệp trợ giúp, ngữ cảnh)

Giải thích cú pháp:

Lời nhắc:

Yêu cầu. Nó là thông tin có thể được cung cấp cho người dùng. Nó phải được chèn vào bên trong  dấu ngoặc kép .

Nút:

Không bắt buộc. Các nút là những loại nút được cung cấp cho thông tin người dùng. Có nhiều nút khác nhau có sẵn cho MsgBox () và chúng có thể được tìm thấy trên các hình ảnh bên dưới.

Chức vụ:

Không bắt buộc. Nó là tiêu đề cho thông tin được cung cấp cho người dùng. Nếu không được cung cấp,  Microsoft word  sẽ là tiêu đề mặc định.

Hồ sơ trợ giúp và ngữ cảnh:

• Không bắt buộc. Helpfile sẽ xác định tệp Trợ giúp có sẵn trong đĩa cục bộ, tệp này có thể được cung cấp dưới dạng trợ giúp trong hộp thoại
• Không bắt buộc. Ngữ cảnh là biểu thức số được sử dụng để xác định chủ đề trợ giúp bằng số duy nhất.

Mã hộp thư mẫu

'VBA
Sub messagebox()

'Variables assigned

Dim buttonclick As VbMsgBoxResult

'Message box to display information to user

MsgBox "Hi, Visual Basic is easy to work with", vbExclamation, "VBA"

'Message box to ask question to user with yes or no question
buttonclick = MsgBox("Do you like VBA?", vbQuestion + vbYesNo, "VBA")
If buttonclick = vbYes Then
MsgBox "Yes, they are great!", vbExclamation, "VBA"
Else
MsgBox "Why not? They are great!", vbCritical, "VBA"
End If

End Sub

Đầu ra:

Hộp thoại và Hộp nhập Mã VBA

Hộp nhập liệu là một hộp thoại đơn giản cho phép chúng tôi nhắc người dùng một số thông tin. Hãy để chúng tôi làm quen với mã VBA bằng cách sử dụng một ví dụ.

Cú pháp:

InputBox (Lời nhắc, Tiêu đề, Mặc định, XPos, YPos, HelpFile, HelpContextId, Type)

Giải thích cú pháp:

Lời nhắc:

Yêu cầu. Nó là thông tin có thể được cung cấp cho người dùng. Nó phải được chèn vào bên trong  dấu ngoặc kép .

Chức vụ:

Không bắt buộc. Nó là tiêu đề cho thông tin được cung cấp cho người dùng. Nếu không được cung cấp,  Microsoft word  sẽ là tiêu đề mặc định.

Vỡ nợ:

Không bắt buộc. Nó hiển thị giá trị mặc định bên trong hộp văn bản, trước khi người dùng nhập giá trị. Nếu không được chỉ định, hộp văn bản sẽ trống.

XPos:

Không bắt buộc. Nó được sử dụng làm vị trí trên trục X. Từ trái sang phải

YPos:

Không bắt buộc. Nó được sử dụng làm vị trí trên trục Y. Từ đầu đến cuối

Helpfile và HelpContext ID:

• Không bắt buộc. Helpfile sẽ xác định tệp Trợ giúp có sẵn trong đĩa cục bộ, tệp này có thể được cung cấp dưới dạng trợ giúp trong hộp thoại
• Không bắt buộc. ID HelpContext là số id của tệp trợ giúp.

Nhập mã hộp:

'VBA
Sub macro()

'Variables assigned
Dim a As Long
Dim b As Long

'Input box to get value from user

a = InputBox("Enter a value for a", "Question 1")
b = InputBox("Enter a value for b", "Question 2")

'Answer displayed in a message box
MsgBox ("Answer is " & Val(a) + Val(b))
End Sub

Đầu ra: