☰

Outlook 2010: definir nível de zoom padrão para leitura de mensagens

tag-icon • tag-icon microsoft-outlook microsoft-outlook-2010
Outlook 2010: definir nível de zoom padrão para leitura de mensagens

Ao abrir mensagens no Outlook 2010 (sem usar o painel de leitura), você pode manter o controle pressionado e rolar a roda do mouse para aumentar o zoom na mensagem, mas deve fazer isso sempre que abrir uma mensagem.

Existe uma maneira de definir o nível de zoom padrão para mensagens? Por exemplo, defina o nível de zoom como padrão para 150% para cada mensagem.

Falhando nisso, existe algumaoutromaneira de aumentar o texto padrão ao ler mensagens? (sem alterar as configurações de DPI no sistema operacional)

Responder1

Este é um comportamento normal no Outlook 2010; ele não retém ajustes de zoom. A única opção que você tem é criar uma macro que seja executada na inicialização ou usar um complemento para controle de zoom.

Veja como adicionar VBA para definir o nível de zoom na inicialização do aplicativo.

  1. Defina a segurança da sua macro como Baixa.
  2. Abra o editor VB usando Alt+F11
  3. Expanda Project1 para mostrarThisOutlookSession
  4. Cole a macro emThisOutlooksession
  5. Defina uma referência ao Microsoft Word em Ferramentas, Referências
  6. Clique na Application_Startupmacro e pressione o Runbotão para iniciá-la sem reiniciar o Outlook.
Option Explicit
Dim WithEvents objInspectors As Outlook.Inspectors
Dim WithEvents objOpenInspector As Outlook.Inspector
Dim WithEvents objMailItem As Outlook.MailItem

Private Sub Application_Startup()
Set objInspectors = Application.Inspectors
End Sub

Private Sub Application_Quit()
Set objOpenInspector = Nothing
Set objInspectors = Nothing
Set objMailItem = Nothing
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If Inspector.CurrentItem.Class = olMail Then
Set objMailItem = Inspector.CurrentItem
Set objOpenInspector = Inspector
End If
End Sub

Private Sub objOpenInspector_Close()
Set objMailItem = Nothing
End Sub

Private Sub objOpenInspector_Activate() 
Dim wdDoc As Word.Document
Set wdDoc = objOpenInspector.WordEditor
wdDoc.Windows(1).Panes(1).View.Zoom.Percentage = 150
End Sub

Nota: A penúltima linha é onde você define a porcentagem de zoom. Altere 150para a porcentagem desejada.

Fonte -Ajustando a configuração de zoom do Outlook no email

Responder2

Encontrei um complemento chamadoMais Zoomque adiciona um botão à faixa de opções para salvar o zoom de todas as mensagens que você abre (você também pode alterá-lo quando quiser). A única desvantagem é que é uma ferramenta paga.

informação relacionada