Với macro EDITHTML từ hướng dẫn này, bạn có thể chỉnh sửa hoặc thay thế hoàn toàn HTML của một thông báo bạn đang soạn. Điều này giúp dễ dàng hơn nhiều để thực hiện các sửa đổi cụ thể hoặc sử dụng mã HTML mà bạn đã tạo trong một trình soạn thảo HTML khác.
Bằng cách này, bạn có thể đảm bảo rằng thiết kế được tạo cẩn thận của bạn, như cho một bản tin, không được sửa đổi bởi WordHTML và vẫn tương thích với các ứng dụng thư khác.
- Macro Edithtml
- Cài đặt nhanh
- Mã Macro
Macro Edithtml
Mã Macro
Macro EdithTML cho phép bạn dễ dàng chỉnh sửa mã nguồn HTML thô trong khi soạn email.
Điều này cho phép bạn thực hiện các thay đổi cụ thể cho một phần nhất định trong email của bạn, nhanh chóng nhập mẫu HTML hoặc thay thế hoàn toàn HTML của tin nhắn bằng một mẫu [như cho một bản tin] mà bạn đã tạo trong một ứng dụng khác.
- Để ngăn mã của bạn bị thay đổi bởi động cơ WordHTML, bạn có thể gửi email trực tiếp từ trình chỉnh sửa HTML để nó sẽ đi ra chính xác như bạn dự định.
Any modifications that you’ve made to the HTML code is being applied to the message. Note however that further editing the message or even sending it could result in WordHTML restructuring or rewriting your HTML code. Usually, this doesn’t lead to any visual changes. - Bằng cách thực hiện macro EdithTML, bạn sẽ mở một cửa sổ hộp thoại chứa hộp văn bản để chỉnh sửa HTML. Bên dưới hộp văn bản này có 3 lệnh để lựa chọn;
If you really don’t want WordHTML to change your HTML again then this is your best pick. The macro will apply the HTML code from the HTML Editor to the message and sends out the message with the HTML exactly as you’ve put it in the editor. This is often needed for design heavy newsletters for which rerendering it with WordHTML could break the design for other mail clients.
The macro can only send it when you’ve specified at least one recipient and the subject for the message. You’ll get a reminder of this in case your forgot. - Áp dụng các sửa đổi mà bạn đã thực hiện cho mã HTML đang được áp dụng cho tin nhắn. Tuy nhiên, lưu ý rằng việc chỉnh sửa thêm thông báo hoặc thậm chí gửi nó có thể dẫn đến tái cấu trúc WordHTML hoặc viết lại mã HTML của bạn. Thông thường, điều này không dẫn đến bất kỳ thay đổi trực quan nào.
This button does exactly what you expect it to do; It will not apply any changes that you’ve made in the HTML Editor to the message that you are composing and closes the HTTML Editor to return you to your message.
Áp dụng & Send nếu bạn thực sự không muốn WordHTML thay đổi HTML của bạn một lần nữa thì đây là lựa chọn tốt nhất của bạn. Macro sẽ áp dụng mã HTML từ trình chỉnh sửa HTML vào tin nhắn và gửi tin nhắn với HTML chính xác như bạn đã đặt nó vào trình chỉnh sửa. Điều này thường cần thiết cho các bản tin hạng nặng thiết kế để tạo lại nó bằng WordHTML có thể phá vỡ thiết kế cho các ứng dụng thư khác. Macro chỉ có thể gửi nó khi bạn đã chỉ định ít nhất một người nhận và chủ đề cho tin nhắn. Bạn sẽ nhận được một lời nhắc về điều này trong trường hợp bạn quên.
Cài đặt nhanh
- Mã Macro
- Macro EdithTML cho phép bạn dễ dàng chỉnh sửa mã nguồn HTML thô trong khi soạn email.
- Điều này cho phép bạn thực hiện các thay đổi cụ thể cho một phần nhất định trong email của bạn, nhanh chóng nhập mẫu HTML hoặc thay thế hoàn toàn HTML của tin nhắn bằng một mẫu [như cho một bản tin] mà bạn đã tạo trong một ứng dụng khác.
- Để ngăn mã của bạn bị thay đổi bởi động cơ WordHTML, bạn có thể gửi email trực tiếp từ trình chỉnh sửa HTML để nó sẽ đi ra chính xác như bạn dự định.
- Bằng cách thực hiện macro EdithTML, bạn sẽ mở một cửa sổ hộp thoại chứa hộp văn bản để chỉnh sửa HTML. Bên dưới hộp văn bản này có 3 lệnh để lựa chọn;
- Áp dụng các sửa đổi mà bạn đã thực hiện cho mã HTML đang được áp dụng cho tin nhắn. Tuy nhiên, lưu ý rằng việc chỉnh sửa thêm thông báo hoặc thậm chí gửi nó có thể dẫn đến tái cấu trúc WordHTML hoặc viết lại mã HTML của bạn. Thông thường, điều này không dẫn đến bất kỳ thay đổi trực quan nào.
Áp dụng & Send nếu bạn thực sự không muốn WordHTML thay đổi HTML của bạn một lần nữa thì đây là lựa chọn tốt nhất của bạn. Macro sẽ áp dụng mã HTML từ trình chỉnh sửa HTML vào tin nhắn và gửi tin nhắn với HTML chính xác như bạn đã đặt nó vào trình chỉnh sửa. Điều này thường cần thiết cho các bản tin hạng nặng thiết kế để tạo lại nó bằng WordHTML có thể phá vỡ thiết kế cho các ứng dụng thư khác. Macro chỉ có thể gửi nó khi bạn đã chỉ định ít nhất một người nhận và chủ đề cho tin nhắn. Bạn sẽ nhận được một lời nhắc về điều này trong trường hợp bạn quên.
Mã Macro
Macro EdithTML cho phép bạn dễ dàng chỉnh sửa mã nguồn HTML thô trong khi soạn email.
'=============================================================================== 'Description: Outlook macro to edit the HTML of an email that you are composing. ' ' author : Robert Sparnaaij ' version: 1.0 ' website: //www.howto-outlook.com/howto/edit-html-source-code-email.htm '=============================================================================== Sub EditHTML[] HTMLEditor ["Edit"] End Sub Function HTMLEditor[ByVal Action As String] Dim objMail As MailItem, oInspector As Inspector Dim msgResult As Integer, msgText As String, msgTitle As String msgText = "This is not an editable email in HTML format." msgTitle = "Email HTML Editor" Set oInspector = Application.ActiveInspector If oInspector Is Nothing Then msgResult = MsgBox[msgText, vbCritical, msgTitle] Else Set objMail = oInspector.CurrentItem With objMail If .Sent Then msgResult = MsgBox[msgText, vbCritical, msgTitle] Else If .BodyFormat = olFormatHTML Then Select Case Action Case "Edit" HTMLEditForm.HTMLTextBox.Text = .HTMLBody HTMLEditForm.Show Case "Apply" .HTMLBody = HTMLEditForm.HTMLTextBox.Text HTMLEditForm.Hide Case "ApplySend" If [.Recipients.Count = 0] Or [.Recipients.ResolveAll = False] Or [.Subject = ""] Then msgResult = MsgBox["Please specify the recipients and/or the Subject for this message first." _ & vbNewLine & "Choose Apply or Cancel instead.", vbCritical, msgTitle] Else .Close olSave .HTMLBody = HTMLEditForm.HTMLTextBox.Text .Send HTMLEditForm.Hide End If End Select Else msgResult = MsgBox[msgText, vbCritical, msgTitle] End If End If End With Set objMail = Nothing End If Set oInspector = Nothing End Function
Điều này cho phép bạn thực hiện các thay đổi cụ thể cho một phần nhất định trong email của bạn, nhanh chóng nhập mẫu HTML hoặc thay thế hoàn toàn HTML của tin nhắn bằng một mẫu [như cho một bản tin] mà bạn đã tạo trong một ứng dụng khác.
Private Sub ApplyButton_Click[] Call HTMLEdit.HTMLEditor["Apply"] End Sub Private Sub ApplySendButton_Click[] Call HTMLEdit.HTMLEditor["ApplySend"] End Sub Private Sub CancelButton_Click[] Me.Hide End Sub