Muayyan sana oralig'ida rejalashtirilgan barcha Outlook uchrashuvlarini qanday to'plamli bekor qilish kerak

Agar Outlook-da ma'lum bir sana oralig'ida rejalashtirilgan barcha uchrashuvlarni bekor qilmoqchi bo'lsangiz, ushbu maqolada keltirilgan vositalardan foydalanishingiz mumkin. Bu sizni bunday uchrashuvlarni qo'lda qidirish va bekor qilishdan qutqarishi mumkin.

Agar ba'zi sabablarga ko'ra siz kelgusida ma'lum bir sana oralig'ida o'tkaziladigan uchrashuvlarni tashkil qila olmasangiz yoki unda qatnasha olmasangiz, bunday uchrashuvlarning barchasini bekor qilishingiz mumkin. Umuman olganda, siz avval ularni bilib olishingiz va keyin ularni birma-bir bekor qilishingiz kerak. Bu juda qiyin bo'ladi. Shuning uchun, quyida biz sizga boshqa usulni aytib beramiz, bu esa ancha qulayroqdir.

Muayyan sana oralig'ida rejalashtirilgan barcha uchrashuvlarni to'plam bekor qilish

1. Eng boshida, Outlook dasturingizni ishga tushiring.
2. Keyin, Outlook-da siz "Alt + F11" tugmachalarini bosishingiz kerak.
3. Keyinchalik, siz "Ilovalar uchun Microsoft Visual Basic" oynasiga kirasiz.
4. Ushbu oynada foydalanilmagan modulni ochishingiz yoki shunchaki yangisini kiritishingiz kerak.
5. Keyinchalik, ushbu modulga quyidagi VBA kodini nusxalashingiz mumkin.

Sub BatchCancelAllMeetingsInSpecificDateRange()
    Dim dStartDate As Date
    Dim dEndDate As Date
    Dim objCalendarFolder As Outlook.folder
    Dim objItems As Outlook.Items
    Dim objItemsInDateRange As Outlook.Items
    Dim objAppointment As Outlook.AppointmentItem
    Dim objResponse As Outlook.MeetingItem
 
    'Specify the start date and end date
    dStartDate = InputBox("Enter the start date:", , "10/1/2017")
    dEndDate = InputBox("Enter the end date:", , "10/8/2017")
 
    If dStartDate <> #1/1/4501# And dEndDate <> #1/1/4501# Then
       'Select a calendar folder
       Set objCalendarFolder = Outlook.Application.Session.PickFolder
       Set objItems = objCalendarFolder.Items
       objItems.IncludeRecurrences = True
       objItems.Sort "[Start]"
 
       'Get the appointments in the specific date range
       strFilter = "[Start] >= " & Chr(34) & dStartDate & " 00:00 AM" & Chr(34) & " AND [End] <= " & Chr(34) & dEndDate & " 11:59 PM" & Chr(34)
       Set objItemsInDateRange = objItems.Restrict(strFilter)
 
       objItemsInDateRange.Sort "[Start]"
       For Each objAppointment In objItemsInDateRange
           'Cancel the meetings in this date range
           If objAppointment.MeetingStatus = olMeeting Then
              If objAppointment.Organizer = Outlook.Session.CurrentUser Then
                 objAppointment.MeetingStatus = olMeetingCanceled
                 objAppointment.Save
                 objAppointment.Send
                 objAppointment.Delete
              Else
                 Set objResponse = objAppointment.Respond(olMeetingDeclined)
                 objResponse.Send
                 objAppointment.Delete
              End If
            End If
       Next
    End If
End Sub

6. Oxir-oqibat, siz hozir ushbu makrosni ishga tushirishingiz mumkin.

• Joriy makros oynasida “F5” tugmachasini bosing.
• Keyinchalik, sana oralig'ini ko'rsatish talab qilinadi.
• Shundan so'ng, yana bir dialog oynasi paydo bo'ladi, u sizdan manba kalendar papkasini tanlashni talab qiladi va "OK" tugmasini bosing.
• Nihoyat, makros tugagach, ma'lum bir sana oralig'idagi barcha uchrashuvlar bekor qilinganligini ko'rishingiz mumkin.
• “Yuborishlar” jildida siz quyidagi skrinshot kabi uchrashuv bekor qilinganligini topishingiz mumkin:

Outlook xatolarini tuzatish

Agar siz Outlook-dan o'nlab yillar davomida foydalangan bo'lsangiz, bir nechta xatolarga duch kelgan bo'lishingiz kerak. Yaxshiyamki, Outlook o'rnatilgan ta'mirlash vositasi - Scanpst bilan birga keladi. Buning uchun foydalanishingiz mumkin Outlook-ni tuzatish xatolar. Ammo, agar u muvaffaqiyatsiz bo'lsa, sizning oxirgi chorangiz tashqi tuzatish vositalaridir DataNumen Outlook RepairU Outlook faylini skanerlashi va ko'pgina xatolarni tuzatishi, hatto shikastlangan Outlook ma'lumotlarini osongina tiklashi mumkin.

Muallif kirish:

Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc sql-ni tuzatish va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com