Não há nenhuma opção no Outlook para alterar permanentemente o nível de zoom no painel de leitura. Para uma mudança permanente, vejo duas soluções.
Solução 1: macro do VBA
Use a macro VBA abaixo, detalhada no artigo, Como sempre abrir seu e-mail em um nível de zoom personalizado com o VBA do Outlook .
Private WithEvents objInspectors As Outlook.Inspectors
Private WithEvents objMail As Outlook.MailItem
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If TypeOf Inspector.CurrentItem Is MailItem Then
Set objMail = Inspector.CurrentItem
End If
End Sub
Private Sub objMail_Open(Cancel As Boolean)
Dim objMailDocument As Word.Document
'When opening an email which is not a new mail
If Len(Trim(objMail.Subject)) <> 0 Then
Set objMailDocument = objMail.GetInspector.WordEditor
'Change "150" as per your desired zoom level
objMailDocument.Windows(1).Panes(1).View.Zoom.Percentage = 150
End If
End Sub
Instruções:
- Iniciar o Outlook
- Pressione Alt + F11
- Acesse o projeto
ThisOutlookSession
no lado esquerdo e clique duas vezes em - Copie o código do VBA acima para esta janela do projeto
- Assinar digitalmente este código pelo botão "Ferramentas" na barra de ferramentas e escolhendo "Assinatura digital ..." na lista suspensa.
- Na caixa de diálogo pop-up, ative um certificado digital
- Saia da janela "Microsoft Visual Basic for Applications" e reinicie o Outlook para ativar o novo projeto VBA
- A partir de agora, sempre que você abrir um e-mail que não seja um novo e-mail novo, o e-mail será exibido no seu nível de zoom personalizado
Solução2:ZoomEmailWindows(trialware,US$9,95)
Outraopçãoéobterotrialware
The Zoom Email Windows tool for Outlook automatically zooms all Outlook reading pane windows. It zooms every Outlook window to your specified zoom factor. It’s perfect for being able to instantly and clearly see the email and other Outlook windows.