نکته: زبانهای دیگر گوگل ترجمه شده اند. شما می توانید از English نسخه این لینک
ورود
x
or
x
x
ثبت نام
x

or

چگونه می توان به طور خودکار درخواست جلسه از شخص خاص در Outlook را قبول کرد؟

هنگام دریافت دعوت نامه ملاقات در Outlook، شما باید به صورت دستی درخواست جلسه را بپذیرید و پاسخ را به فرستنده ارسال کنید. آیا راه آسان برای به طور خودکار آن را از یک فرد خاص در چشم انداز وجود دارد؟ روش در این مقاله به شما کمک خواهد کرد.

درخواست پذیرش خودکار از شخص خاص با کد VBA را قبول می کند


به راحتی ایمیل های تکراری را از پوشه ایمیل مشخص شده در یک بار در Outlook حذف کنید:

حذف ایمیل های تکراری سودمندی Kutools برای چشم انداز می تواند به شما کمک کند به سرعت حذف تمام ایمیل های تکراری از یک فیدر ایمیل و یا چند پوشه های مشخص شده در همان زمان در چشم انداز. تصویر را ببینید:

Kutools برای چشم انداز: با بیش از 40 دستی چشم انداز افزوده، آزاد است که بدون محدودیت در روز 45 امتحان کنید. دانلود و محاکمه آزاد اکنون!


درخواست پذیرش خودکار از شخص خاص با کد VBA را قبول می کند

کد زیر VBA می تواند به شما کمک کند که به طور خودکار درخواست جلسه را که از فرد خاصی در Outlook منتقل شده است، قبول کنید. لطفا به شرح زیر عمل کنید.

1 مطبوعات دگرساز + F11 کلید برای باز کردن مایکروسافت ویژوال بیسیک برای برنامه پنجره.

2. در مایکروسافت ویژوال بیسیک برای برنامه پنجره دوبار کلیک کنید ThisOutlookSession در قسمت چپ پنجره پنجره Code را باز کرده و سپس کد زیر را در پنجره VBA کپی کنید. تصویر را ببینید:

کد VBA: خودکار درخواست جلسه از شخص خاص در 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

توجه داشته باشید: در کد، لطفا "نام فرستنده"با نام نمایش دهنده فرستنده

3 کد را ذخیره کنید، سپس دکمه را فشار دهید دگرساز + Q کلید برای بستن مایکروسافت ویژوال بیسیک برای برنامه پنجره.

4 برای خروج از این کد، مجددا راه اندازی کنید.

از حالا به بعد، هنگام دریافت درخواست های جلسه فرستاده شده از فردی که در کد مشخص کرده اید، جلسه به صورت خودکار پذیرفته خواهد شد و فرستنده یک ایمیل پاسخ نیز دریافت خواهد کرد.

توجه داشته باشید: حساب ایمیل که درخواست جلسه دریافت می شود باید به طور پیش فرض در Outlook باشد.


مقالات مرتبط:

ابزارهای توصیه شده برای بهره وری

عکس kutools چشم انداز kutools زبانه 1180x121
kutools چشم انداز kutools به علاوه زبانه 1180x121

Kutools for Outlook - بیش از 100 پیشرفته توابع پیشرفته برای چشم انداز، بهبود 70٪ بهره وری برای شما

  • عملیات پیچیده و مکرر می تواند یک بار پردازش در ثانیه انجام شود.
  • چندین ایمیل به صورت جداگانه به صورت یکبار کلیک کنید و به صورت خودکار با قوانین رو به رو شوید.
  • خودکار CC / BCC هر ایمیل ارسال و آسان برای قوانین سفارشی، و پاسخ خودکار بدون نیاز به سرور مبادله.
  • ایمیل های ناخواسته قدرتمند فیلتر، حذف ایمیل های تکراری، پاسخ با پیوست، دسته ای از عملیات با یک کلیک، و غیره ...
  • آزمایشی رایگان نامحدود 60 روز. تضمین بازگشت پول روز 60. 2 سال رایگان ارتقاء و پشتیبانی. خرید یک بار، برای همیشه استفاده کنید.
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.