Многие пользователи хотят применить представление одной папки к другой в Outlook. Глядя на это требование, в этой статье будут представлены 2 быстрых подхода к его реализации.
Outlook позволяет пользователям настраивать вид папки. Например, вы можете добавить пользовательский столбец в список элементов по желанию. Теперь, если вы разработали представление папки, вы можете надеяться применить его к другим папкам. Итак, после этого мы поделимся с вами двумя способами ее достижения. Вы можете использовать любой по своему вкусу.

Метод 1: реализовать с помощью встроенной функции
- В самом начале запустите приложение Outlook.
- Затем выберите почтовую папку на панели навигации, например папку «Входящие».
- Далее перейдите на вкладку «Вид».
- После этого нажмите на кнопку «Изменить представление».
- В раскрывающемся меню найдите и выберите «Применить текущий вид к другим почтовым папкам».
- В появившемся диалоговом окне вы можете выбрать целевую папку для почты.
- Наконец, нажмите «ОК», чтобы сохранить изменения.
Примечание: Этот метод имеет некоторые недостатки, а именно:
- Как видите, вы не можете применить представление папки «Входящие» к некоторым папкам, таким как «Отправленные», «Черновики», «Удаленные», «Нежелательная почта».
- Кроме того, когда вы выбираете папку «Отправленные» или другие, функция «Применить текущий вид к другим почтовым папкам» становится недоступной, как показано на следующем изображении.
Таким образом, в дальнейшем мы поделимся с вами еще одним методом, который не имеет таких недостатков.
Способ 2: достичь с помощью Outlook VBA
- Для начала откройте редактор Outlook VBA со ссылкой на «Как запустить код VBA в Outlook».
- Затем поместите следующий код VBA в модуль.
Sub ApplyViewOfOneFolderToAnother()
Dim SourceFolder As Outlook.Folder
Dim TargetFolder As Outlook.Folder
'Get the source folder
Set SourceFolder = Outlook.Application.Session.PickFolder
'To specify the current folder, use the following line instead
'Set SourceFolder = Outlook.Application.ActiveExplorer.CurrentFolder
If Not SourceFolder Is Nothing Then
'Select the target folder
Set TargetFolder = Application.Session.PickFolder
If Not TargetFolder Is Nothing Then
If TargetFolder.DefaultItemType = SourceFolder.DefaultItemType Then
'Copy the View Settings from source folder to the target
With TargetFolder.CurrentView
.XML = SourceFolder.CurrentView.XML
.Save
End With
Else
MsgBox "Source and target folder should be in the same type.", vbExclamation + vbOKOnly
End If
End If
End If
End Sub
- Наконец, нажмите «F5», чтобы запустить этот макрос.
- После этого вам будет предложено выбрать исходную и целевую папку, например, «Входящие» и «Отправленные».
- Когда макрос завершится, вы увидите, что представления «Входящие» и «Отправленные» были одинаковыми, как на снимке экрана ниже:
Что делать, если столкнетесь с повреждением Outlook
Что делать в случае повреждения Outlook? Чаще всего вы можете сначала воспользоваться инструментом восстановления папки «Входящие», чтобы попытаться восстановить поврежденный Outlook файл. Если утилита, к сожалению, не работает, у вас нет другого выбора, кроме как прибегнуть к мощному внешнему инструменту, такому как DataNumen Outlook Repair.
Об авторе:
Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая оправляться Sql Server и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com





