Khi bạn muốn chèn nhanh văn bản vào cuối một email khá dài, bạn sẽ mất một chút thời gian để cuộn xuống cuối cùng. Bài viết này sẽ trình bày một phương pháp có thể cho phép bạn nhanh chóng chuyển đến phần cuối hoặc phần đầu của nội dung email thông qua VBA.
Đôi khi, khi xem một email dài, bạn có thể muốn nhanh chóng nhảy đến hoặc di chuyển con trỏ đến đầu hoặc cuối nội dung email theo ý muốn. Ví dụ, bạn muốn kiểm tra chữ ký của người gửi, vì vậy bạn phải nhảy đến cuối. Thông thường, bạn phải cuộn xuống cho đến khi đến cuối. Điều này có thể hơi rắc rối. Do đó, ở đây chúng tôi sẽ cung cấp cho bạn một đoạn mã VBA, có thể giúp bạn nhảy đến đầu hoặc cuối chỉ bằng một cú nhấp chuột.
Chuyển nhanh đến phần đầu hoặc phần cuối của nội dung thư
- Ngay từ đầu, hãy khởi động chương trình Outlook của bạn.
- Sau đó, trong cửa sổ Outlook chính, nhấn các nút phím “Alt + F11”.
- Tiếp theo, bạn sẽ vào cửa sổ “Microsoft Visual Basic for Applications”.
- Tại thời điểm này, bạn cần mở một mô-đun trống hoặc trực tiếp chèn một mô-đun mới.
- Sau đó, bạn nên sao chép và dán mã VBA sau vào cửa sổ mô-đun như vậy.
Dim objCurrentMail As Outlook.MailItem Dim objWordDocument As Word.Document Dim objWordRange As Word.Range Dim VarPosition As Variant Sub JumpToEnd() 'Chỉ hoạt động nếu email hiện tại đang sử dụng trình soạn thảo Word Set objCurrentMail = Outlook.Application.ActiveInspector.CurrentItem Set objWordDocument = objCurrentMail.GetInspector.WordEditor If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.End - 1 Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select End If End Sub Sub JumpToStart() If Not (objWordDocument Is Nothing) Then VarPosition = objWordDocument.Range.Start Set objWordRange = objWordDocument.Range(VarPosition, VarPosition) objWordRange.Select End If End Sub
- Sau đó, bạn nên thêm hai chương trình con mới vào Thanh công cụ truy cập nhanh của cửa sổ thông báo.
- Đầu tiên, mở một email trong cửa sổ Tin nhắn.
- Sau đó nhấp vào mũi tên xuống trong Thanh công cụ truy cập nhanh.
- Từ danh sách thả xuống, bạn nên chọn “More Commands”.
- Trong cửa sổ tiếp theo, bạn có thể thêm macro vào Thanh công cụ truy cập nhanh như ảnh chụp màn hình sau:
- Cuối cùng nhấp vào một loạt “OK” để lưu các thay đổi.
- Tóm lại, từ giờ trở đi, bạn có thể chuyển đến đầu hoặc cuối email chỉ bằng cách nhấp vào nút trên Thanh công cụ truy cập nhanh, như hình ảnh bên dưới:
Điều gì sẽ xảy ra nếu tệp PST bị xâm phạm
Do tệp PST dễ bị lỗi và bị hỏng, bạn nên cố gắng hết sức để bảo vệ dữ liệu PST của mình. Chẳng hạn, bạn phải sao lưu định kỳ tệp PST của mình. Hơn nữa, để có thể lấy lại PST bị hỏng dữ liệu kịp thời, tốt hơn hết bạn nên giữ một công cụ mạnh mẽ bên mình, chẳng hạn như DataNumen Outlook Repair. Nó chuyên khắc phục các sự cố PST và truy xuất dữ liệu PST.
Giới thiệu tác giả:
Shirley Zhang là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm SQL Server sửa chữa và các sản phẩm phần mềm sửa chữa triển vọng. Để biết thêm thông tin, hãy truy cập www.datanumennăm