Qanday qilib boshqalarga topshirilgan vazifalarni Outlook-da ma'lum bir papkaga avtomatik ravishda ko'chirish mumkin

Umuman olganda, siz yutgan vazifalaringiz yoki boshqalarga topshirgan vazifalaringizdan qat'i nazar, barcha vazifalar standart Outlook vazifalar jildiga joylashtiriladi. Ushbu maqola Outlook-ni qanday qilib boshqalarga tayinlangan vazifalarni ma'lum bir papkaga avtomatik ko'chirishni ko'rib chiqadi.

Outlook bizga boshqalarga vazifalarni belgilash imkonini beradi. Shu bilan birga, siz boshqa odamlarga topshirgan vazifalar ham standart vazifalar papkasida saqlanadi. Bunday holda, agar siz tez-tez boshqalarga topshiriq berishingiz kerak bo'lsa, sizning vazifa papkangiz tartibsiz bo'ladi. Vazifalaringizni tasniflash va boshqarishning eng yaxshi usuli bu alohida jild yaratish va keyin boshqalarga tayinlangan vazifalarni ushbu jildga ko'chirishdir. Ammo buni qo'lda qilish biroz qiyin bo'ladi. Bu erda biz sizga Outlook VBA bilan avtomatik ravishda erishishga yordam beramiz.

Boshqalarga yuklangan vazifalarni avtomatik ravishda ma'lum bir papkaga ko'chirish

1. Boshlash uchun siz yangi vazifalar papkasini yaratishingiz kerak. Standart vazifalar papkangiz ustiga sichqonchaning o'ng tugmachasini bosing va "Yangi papka" ni tanlang. Unga nom bering. Bu yerda biz misol sifatida "Sinov" ni olamiz.
2. Keyin "Tuzuvchi" yorlig'iga o'ting va "Visual Basic" tugmasini bosing.
3. Keyin yangi "Visual Basic" oynasida "ThisOutlookSession" loyihasini ikki marta bosing va unga quyidagi VBA kodlarini ko'chiring.

Public WithEvents Items As Outlook.Items

Sub Application_Startup()
    Set Items = Session.GetDefaultFolder(olFolderTasks).Items
End Sub

Sub Items_ItemAdd(ByVal Item As Object)
    If TypeName(Item) = "TaskItem" Then
       MoveTask Item
    End If
End Sub

Sub MoveTask(Item As TaskItem)
    Dim Folder As Outlook.Folder
    Dim myName As String
 
    'replace "smith" with your own account name
    myName = "Smith"
 
    If InStr(Item.Owner, myName) = 0 Then
       Set Folder = Session.GetDefaultFolder(olFolderTasks).Folders("Test")
       Item.Move Folder
    End If
End Sub

Eslatma: “Mening ismim” qatori shaxsiy hisob nomingizga bog'liq. Quyidagi skrinshot kabi "Ismingiz" maydonini tekshirish uchun "Hisob sozlamalari" ga o'tishingiz mumkin:

4. Shundan so'ng, siz ushbu kodni imzolashingiz va makro sozlamalarini o'zgartirishingiz kerak. Qo'shimcha ma'lumot olish uchun "Outlook-da keraksiz elektron pochta xabarlarini o'qilgan deb avtomatik belgilash uchun 2 qadam" maqolasining 2-bosqichiga murojaat qilishingiz mumkin.
5. Nihoyat, siz sinab ko'rishingiz mumkin.

• Avval yangi vazifa yarating va yangi Vazifa oynasida "Vazifa tayinlash" tugmasini bosing.
• Keyin siz topshiriqni tuzishingiz va qabul qiluvchini tanlashingiz va oxirgi marta "Yuborish" tugmasini bosishingiz mumkin.
• Shundan so'ng, siz o'zingizning vazifangiz papkasi ro'yxatiga o'tishingiz mumkin. Siz ushbu vazifaning "Test" papkasida aniq joylashtirilganligini topasiz.

Buzuq Outlook fayllari bilan shug'ullaning

Agar siz Outlook fayllaringiz bilan bog'liq Outlook xato xabarlarini olsangiz, fayllar buzilgan bo'lishi mumkin. Bunday holatda, siz sinash uchun o'rnatilgan ta'mirlash vositasi, Scanpst.exe dan foydalanishingiz mumkin. Agar u muvaffaqiyatsiz bo'lsa, sizning oxirgi chorangiz kuchliroqni tanlashi kerak buzilgan Outlook faylini tuzatish vositasikabi DataNumen Outlook Repair.

Muallif kirish:

Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc ta'mirlash SQL Server mdf ma'lumotlar bazasi va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com