Mẹo: Các ngôn ngữ khác được Dịch bởi Google. Bạn có thể ghé thăm English phiên bản của liên kết này.
Đăng nhập
x
or
x
x
Ghi danh
x

or

Làm cách nào để tự động chấp nhận yêu cầu họp từ người cụ thể trong Outlook?

Khi nhận được lời mời họp trong Outlook, bạn cần phải chấp nhận yêu cầu họp một cách thủ công và gửi phản hồi cho người gửi. Có cách nào dễ dàng để tự động chấp nhận nó từ một người cụ thể trong Outlook không? Phương pháp trong bài viết này sẽ làm bạn một ưu tiên.

Tự động chấp nhận yêu cầu họp từ người cụ thể bằng mã VBA


Dễ dàng loại bỏ các email trùng lặp từ thư mục email được chỉ định cùng một lúc trong Outlook:

Xóa Email trùng lặp tiện ích của Kutools cho Outlook có thể giúp bạn nhanh chóng xóa tất cả các email trùng lặp khỏi bộ mã hóa email hoặc nhiều thư mục được chỉ định cùng một lúc trong Outlook. Xem ảnh chụp màn hình:

Kutools cho Outlook: với hơn 40 tiện ích Outlook add-ins, miễn phí để thử mà không có giới hạn trong 45 ngày. Tải xuống và dùng thử ngay bây giờ!


Tự động chấp nhận yêu cầu họp từ người cụ thể bằng mã VBA

Mã VBA dưới đây có thể giúp bạn tự động chấp nhận yêu cầu gặp mặt được gửi từ một người cụ thể trong Outlook. Hãy làm như sau.

1. Nhấn nút Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, nhấp đúp ThisOutlookSession trong ngăn bên trái để mở cửa sổ mã, và sau đó sao chép dưới mã VBA vào cửa sổ. Xem ảnh chụp màn hình:

Mã VBA: Tự động chấp nhận yêu cầu họp từ người cụ thể trong Outlook

Public WithEvents GItems As Outlook.Items
'Updated by ExtendOffice 20180814
Private Sub Application_Startup()
    Set GItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GItems_ItemAdd(ByVal Item As Object)
Dim xMtRequest As MeetingItem
Dim xAppointmentItem As AppointmentItem
Dim xMtResponse As MeetingItem
If Item.Class = olMeetingRequest Then
    Set xMtRequest = Item
    Set xAppointmentItem = xMtRequest.GetAssociatedAppointment(True)
    If xAppointmentItem.GetOrganizer.Name = "Sender Name" Then
        With xAppointmentItem
            .ReminderMinutesBeforeStart = 45
            .Categories = "Orange Category"
            .Save
        End With
        Set xMtResponse = xAppointmentItem.Respond(olMeetingAccepted)
        xMtResponse.Send
        xMtRequest.Delete
    End If
End If
End Sub

chú thích: Trong mã, vui lòng thay thế “Tên người gửi”Với tên hiển thị của người gửi.

3. Lưu mã, sau đó nhấn Khác + Q phím để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.

4. Khởi động lại Outlook để có hiệu ứng mã này.

Từ bây giờ, khi nhận được các yêu cầu gặp mặt được gửi từ người bạn đã chỉ định trong mã, cuộc họp sẽ được chấp nhận tự động và người gửi cũng sẽ nhận được email phản hồi.

chú thích: Tài khoản email nhận yêu cầu họp phải là tài khoản mặc định trong Outlook của bạn.


Các bài liên quan:

Các công cụ sản xuất được đề nghị

bắn kutools triển vọng tab kutools 1180x121
bắn kutools triển vọng kutools cộng với tab 1180x121

Kutools cho Outlook - Hơn cả chức năng nâng cao 100 cho Outlook, cải thiện hiệu quả 70% cho bạn

  • Các hoạt động phức tạp và lặp đi lặp lại có thể được thực hiện xử lý một lần trong vài giây.
  • Chuyển tiếp nhiều email riêng lẻ với một cú nhấp chuột và tự động chuyển tiếp theo quy tắc.
  • Tự động CC / BCC mỗi khi gửi email và dễ dàng tùy chỉnh các quy tắc và tự động trả lời mà không yêu cầu máy chủ trao đổi.
  • Bộ lọc email rác mạnh mẽ, xóa email trùng lặp, trả lời bằng tệp đính kèm, một loạt các thao tác bằng một cú nhấp chuột, v.v.
  • Dùng thử miễn phí không giới hạn ngày không giới hạn. Bảo đảm hoàn lại tiền trong ngày. 60 năm miễn phí nâng cấp và hỗ trợ. Mua một lần, sử dụng mãi mãi.
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.