У меня есть учетная запись IMAP, и я хотел бы скопировать пользовательские представления в другие папки в различных файлах PST.
Идея состоит в том, чтобы использовать VBA для этого.
В настоящий момент яМожно использовать VBA для применения определенного представления к папке IMAP, потому что я уже создал эти представления.Но, просматривая другие pst файлы, таких же представлений там не существует.
Основываясь на советах по использованию Outlook.View
, я создал форму с 2 кнопками и 2 событиями, которые вызывают 2 различных подпрограммы с функциями сохранения / применения:
Private Sub CommandButtonApplyView_Click()
Call ApplyStoredView
End Sub
Private Sub CommandButtonStoreView_Click()
Call StoreView
End Sub
И нау меня есть модуль:
Public StoredView As Outlook.View
Public Sub StoreView()
Set StoredView = Application.ActiveExplorer().CurrentView
End Sub
Public Sub ApplyStoredView()
StoredView.Apply
End Sub
Идея состоит в том, чтобы сохранить представление в глобальном var StoredView
и сохранить его по щелчку с помощью CommandButtonApplyView
и в любой другой папке с помощью другой кнопки CommandButtonStoreView
Папка, к которой будет применено мое представление (например, в другом файле pst), не переформатируется в соответствии с сохраненным представлением.
Кажется, что мы сохраняем только стандартные 4 представленияСуществующие в pst «Табличные представления», «Компакт», «Одиночный» и «Предварительный просмотр»Новый вид (сохраненный) не учитывается.