|
|||||||
outlook-vba 3.3. Ссылка на любую папку в любом доступном хранилище
Время создания: 09.04.2020 19:32
Текстовые метки: vba_outlook
Раздел: Разные закладки - VBA - Outlook - outlook-vba
Запись: xintrea/mytetra_db_adgaver_new/master/base/1586449774hfoipmrmvy/text.html на raw.githubusercontent.com
|
|||||||
|
|||||||
outlook-vba 3.3. Ссылка на любую папку в любом доступном хранилище TestFldrChain() демонстрирует, как ссылаться на любую папку в любом доступном хранилище: Sub TestFldrChain()
Dim Fldr As Folder
Set Fldr = Session.Folders("A").Folders("A2"). _
Folders("A21").Folders("A213")
Debug.Print Join(GetFldrNames(Fldr), "|")
End Sub
В TestFldrChain() : A - имя магазина; A2 - имя папки внутри A; A21 - это имя папки в A2, а A213 - имя папки в A21. Что здесь происходит? Session имеет свойство Folders которое является списком всех доступных магазинов. Session.Folders(integer) , который я использовал во второй части этого учебника, позволяет мне последовательно проходить через магазины, когда я не знаю их имен. Session.Folders("A") позволяет мне получить доступ к папке, когда я знаю ее имя. Session.Folders("A") - это папка, и у нее тоже есть свойство Folders . Session.Folders("A").Folders("A2") дают мне доступ к папке «A2» в магазине «A». Я могу связать столько Folders("x") s, сколько необходимо для доступа к любой папке. Если цепочка слишком длинная для одной строки, вы можете разделить оператор на несколько строк, как я. Ищите самую глубоко вложенную папку в вашей установке и замените A, A2, A21 и A213 именами вашего магазина и папок. При необходимости увеличивайте или уменьшайте количество папок в цепочке. Если вы обновите и запустите TestFldrChain() , он выведет следующее, за исключением того, что A, A2 и т. Д. Будут заменены вашими именами папок: A|A2|A21|A213
|
|||||||
Так же в этом разделе:
|
|||||||
|
|||||||
|