Cookies დაგვეხმარება სიტყვით ჩვენი მომსახურება. გამოყენებით ჩვენი მომსახურება, თქვენ ეთანხმებით, რომ ჩვენი გამოყენების cookies.
რჩევა: სხვა ენები Google- ით თარგმნილია. შეგიძლიათ ეწვიოთ English ამ ბმის ვერსია.
შესვლა
x
or
x
x
რეგისტრაცია
x

or

როგორ გახსენით ყველა ქვესაქაღალდი Outlook- დან?

თუ თქვენ შექმენით მრავალჯერადი ქვესაქაღალები თქვენი Outlook- ის ფოლდერებით, როგორ შეგიძლიათ გახსნათ ან გააფართოვოთ ყველა ამ ქვეფრონტერს დაუყოვნებლივ? ამ სტატიაში, მე გავეცნობით ამ ვაკანსიის ამოქმედებას.

გახსენით ან გაფართოება ყველა subfolders საწყისი Outlook ერთად VBA კოდი


გახსენით ან გაფართოება ყველა subfolders საწყისი Outlook ერთად VBA კოდი

გთხოვთ, გამოიყენოთ შემდეგი VBA კოდი ყველა Outlook ანგარიშებიდან ყველა subfolder- ის გაფართოების მიზნით:

1. გეჭიროთ ALT + F11 გასაღებები გასახსნელად Microsoft Visual Basic აპლიკაციებისათვის window.

2. დაწკაპეთ ჩადეთ > მოდულები, და ჩასვით შემდეგი მაკრო მოდული ფანჯარაში.

VBA კოდი: გახსენით ყველა ქვესაქაღალდი Outlook- დან:

Sub ExpandAllMailFolders () Dim xCurrentFolder როგორც Folder Dim xAllFolders როგორც საქაღალდეები Dim xFolder როგორც Folder On შეცდომა რეზიუმე შემდეგი Set xCurrentFolder = Application.ActiveExplorer.CurrentFolder უცნობია xAllFolders = განაცხადის Session.Folders თითოეული xFolder In xAllFolders მოვუწოდებთ ProcessFolders (xFolder) შემდეგი Set განაცხადის. ActiveExplorer.CurrentFolder = xCurrentFolder End Sub ქვე პროცესის ფოლდერები (ByVal CurFolder როგორც საქაღალდე) Dim xSubfolder როგორც Folder On შეცდომა რეზიუმე შემდეგი თუ CurFolder.DefaultItemType <> olMailItem შემდეგ Exit Sub Set Application.ActiveExplorer.CurrentFolder = CurFolder DoEvents თუ CurFolder.Folders.Count = 0 შემდეგ გასვლა ქვე თითოეული xSubfolder In CurFolder.Folders Call ProcessFolders (xSubfolder) შემდეგი ბოლო Sub

3. შემდეგ დააჭირეთ F5 გასაღები გაუშვით ამ კოდს და ყველა ქვეფრონტარის თქვენს ანგარიშზე ყველა ანგარიშზე გაფართოვდა, იხილეთ სკრინშოტი:

doc expand subfolders 1



Kutools ამისთვის Outlook

მეტი 100 გაფართოებული ფუნქციები Outlook, 2010, 2013, 2016 და 2019

ეკრანის კადრი kutools ამისთვის Outlook პატარა ამისთვის banner 201812

მეტი ფუნქციები | უფასო გადმოწერა | მხოლოდ $ 39.00 ასობით ფუნქციებისთვის

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.