Kuidas taotleda, et nõutavad osalejad vastaksid Outlookis teie koosolekukutsele

Outlooki lahendused September 29, 2025

Mõned kasutajad soovivad Outlooki koosolekukutse saatmisel nõuda koosoleku vastuseid ainult nõutavatelt osalejatelt. See artikkel õpetab, kuidas seda Outlook VBA kaudu realiseerida.

Kui soovite koosolekukutsete saatmisel vastuseid mitte küsida, võite lihtsalt klõpsata nupul „Vastusevalikud” ja tühjendada valiku „Taotle vastuseid” märge. Kuid sel viisil ei pea kõik osalejad, olenemata sellest, kas see on kohustuslik või valikuline, oma koosoleku vastuseid saatma. Tegelikkuses on aga most aja jooksul, ei soovi te valikulistelt osalejatelt vastuseid küsida. Sel juhul peate otsima muid meetodeid, näiteks järgmist.

Paluge, et nõutavad osalejad vastaksid Outlookis teie koosolekukutsele

Paluge nõutavatel osalejatel vastata teie koosolekukutsele

  1. Kõigepealt käivitage oma Outlooki rakendus.
  2. Seejärel vajutage Outlooki põhikuval klahvikombinatsiooni Alt + F11.
  3. Järgmisena peaksite pärast Outlooki VBA redaktorile juurdepääsu saamist leidma ja avama projekti „ThisOutlookSession”.
  4. Seejärel kopeerige sellesse projektiaknasse järgmine VBA kood.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMeeting As Outlook.MeetingItem
    Dim objCopiedMeeting As Outlook.AppointmentItem
    Dim objOriginalAttendee As Outlook.recipient
    Dim objCopiedAttendee As Outlook.recipient
 
    If TypeOf Item Is MeetingItem Then
       Set objMeeting = Item
 
       For i = objMeeting.Recipients.count To 1 Step -1
           'Remove Optional Attendees from the Original Meeting Invitation
           Set objOriginalAttendee = objMeeting.Recipients.Item(i)
           If objOriginalAttendee.Type = olOptional Then
              objOriginalAttendee.Delete
           End If
       Next
 
      'Copy the Meeting
      Set objCopiedMeeting = objMeeting.GetAssociatedAppointment(True).Copy
      'Disable "Request Response" Feature in the Copied Meeting
      objCopiedMeeting.ResponseRequested = False
 
      For i = objCopiedMeeting.Recipients.count To 1 Step -1
          'Add the Previously Removed Optional Attendees
          Set objCopiedAttendee = objCopiedMeeting.Recipients.Item(i)
          If objCopiedAttendee.Type = olRequired Then
             objCopiedAttendee.Delete
          End If
      Next
 
      'Send out the Copied Meeting
      objCopiedMeeting.Send
      'Delete the Copied Meeting after Sending
      objCopiedMeeting.Delete
    End If
End Sub

VBA kood – nõudke ainult nõutavatel osalejatel teie koosolekukutsele vastamist

  1. Pärast seda peaksite sellele VBA projektile alla kirjutama.
  • Jääge praegusesse makrosse ja klõpsake tööriistaribal nuppu Tööriistad.
  • Seejärel valige suvand "Digiallkirjad".
  • Järgige hüpikaknas dialoogiboksis selle lõpetamiseks ekraanil kuvatavaid juhiseid.
  1. Hiljem kontrollige oma Outlooki makro sätteid ja veenduge, et digitaalselt allkirjastatud makro on lubatud.
  2. Nüüdsest, kui saadate koosolekukutse, ei pea valikulised osalejad sellele vastama. Nende vaatenurgast näeb koosolekukutse välja järgmine ekraanipilt:Ei küsi vastust

Võitle viiruste ja pahavaraga Outlookis

Outlooki rämpspostifilter mängib olulist rolli ootamatute viirus- ja pahavararünnakute vältimisel. Tänapäeval muutuvad viirused üha keerukamaks. Viirusnakkuste ja pahavararünnakute tõkestamiseks peaksite mitte ainult rämpsposti õigeaegselt blokeerima, vaid ka kahtlastest e-posti domeenidest või aadressidest Microsoftile teatama, mis aitab tugevdada Outlooki rämpsposti filtrit. Lisaks sisseehitatud rämpsposti filtrile peate hoidma ka tohutut remonditööriista, näiteks DataNumen Outlook Repair. Sellel on palju kõrgem Outlooki taastamine võrreldes konkurentidega.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql-i taastamine ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.