Ir para o conteúdo principal

Como clicar para ampliar ou expandir a imagem em um documento do Word?

Este artigo fala sobre como ampliar ou expandir imagens em um documento do Word com um clique do mouse.

Clique para ampliar ou expandir a imagem com o código VBA

Redimensione imagens com Kutools for Word


Clique para ampliar ou expandir a imagem com o código VBA

O seguinte código VBA pode ajudar a ampliar imagens em um documento do Word com um clique. Faça o seguinte.

1. No documento que contém imagens que você irá ampliar com um clique, pressione o botão outro + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo de Classe. Em seguida, copie o código VBA abaixo para a janela Class.

Código VBA 1: Clique para ampliar as imagens

Public WithEvents GApp As Word.Application
'Updated by ExtendOffice 20181129
Private Sub GApp_WindowSelectionChange(ByVal Sel As Selection)
    Dim xShape As InlineShape
    On Error Resume Next
    Set xShape = Sel.InlineShapes(1)
    xShape.Height = 200
    xShape.Width = 200
End Sub

Note: No código, o número 200 é a altura e largura especificadas das imagens ampliadas. Você pode alterar a altura e a largura conforme necessário.

3. Clique inserção > Módulo, copie o código abaixo na janela Módulo.

Código VBA 2: Clique para ampliar as imagens

Dim cls As New Class1
'Updated by ExtendOffice 20181129
Sub register_Event_Handler()
    Set cls.GApp = Word.Application
End Sub

4. aperte o F5 chave para executar o código e fechar o Microsoft Visual Basic para Aplicações janela.

Agora, ao clicar em uma imagem neste arquivo, a imagem será ampliada para o tamanho específico que você deseja.


Redimensione imagens com Kutools for Word

A Redimensionar imagens utilidade de Kutools for Word pode ajudá-lo a redimensionar todas as imagens em uma porcentagem especificada ou imagem selecionada. Por favor, tente.

Kutools for Word : Com mais de 100 suplementos úteis do Word, livre para tentar sem limitação em 60 dias.

Clique Kutools Plus > Redimensionar, selecione uma porcentagem na lista suspensa. Veja a imagem:

Em seguida, todas as imagens no documento atual são redimensionadas com base nesta porcentagem específica.

Para redimensionar todas as imagens com base no tamanho da imagem selecionada, você precisa selecionar a imagem primeiro e depois clicar Kutools Plus > Redimensionar > Redimensionar imagens com seleção. Veja a imagem:

Em seguida, todas as imagens no documento atual são redimensionadas com base na imagem selecionada.

Se você deseja ter um teste gratuito deste utilitário, vá para baixe gratuitamente o software primeiro e, em seguida, aplique a operação de acordo com as etapas acima.


Office Tab - Navegação com guias, edição e gerenciamento de vários documentos no Word:

O Office Tab traz a interface com guias como vista em navegadores como Google Chrome, novas versões do Internet Explorer e Firefox para o Microsoft Word. Isto precisarão seja uma ferramenta que economiza tempo e é insubstituível em seu trabalho. Veja a demonstração abaixo:

Clique para testar gratuitamente o Office Tab!

Melhores ferramentas de produtividade de escritório

Kutools for Word - Eleve sua experiência com palavras com mais 100 Recursos notáveis!

🤖 Assistente de IA do Kutools: Transforme sua escrita com IA - Gerar conteúdo  /  Reescrever texto  /  Resumir documentos  /  Pergunte para obter informações com base no documento, tudo dentro do Word

📘 Domínio de documentos: Páginas divididas  /  Mesclar Documentos  /  Seleção de exportação em vários formatos (PDF/TXT/DOC/HTML...)  /  Conversão em lote para PDF  /  Exportar páginas como imagens  /  Imprima vários arquivos de uma vez...

Edição de conteúdo: Localização e substituição em lote em vários arquivos  /  Redimensionar todas as imagens  /  Transpor linhas e colunas da tabela  /  Converter tabela em texto...

🧹 Limpeza sem esforço: Varrer Espaços extras  /  Quebras de seção  /  Todos os cabeçalhos  /  Caixas de Texto  /  hiperlinks  / Para mais ferramentas de remoção, acesse nosso Remover Grupo...

Inserções criativas: Inserir Mil Separadores  /  Caixas de seleção  /  botões de rádio  /  QR Code  /  Código de barras  /  Tabela de linhas diagonais  /  Legenda da equação  /  Legenda da Imagem  /  Legenda da Tabela  /  Várias fotos  / Descubra mais no Inserir Grupo...

🔍 Seleções de precisão: Identificar páginas específicas  /  tabelas  /  formas  /  parágrafos de título  / Melhore a navegação com mais Selecione recursos...

Aprimoramentos de estrelas: Navegue rapidamente para qualquer local  /  inserir automaticamente texto repetitivo  /  alternar perfeitamente entre janelas de documentos  /  11 ferramentas de conversão...

👉 Quer experimentar esses recursos? Kutools para Word oferece um 60-day free trial, sem limitações! 🚀
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Yeah nice try, but it should really put the enlarged image in a temporary popup, instead of literally resizing the image!
This comment was minimized by the moderator on the site
OK...after clicking to expand, how do you get it to restore back to default size or click to default size?
This comment was minimized by the moderator on the site
It work in older world file, saved as .doc, but opened in MS 365.
This comment was minimized by the moderator on the site
Hi

The macro doesn't work as should. On MS Office 365 the resizing appear only for few mili sec.
This comment was minimized by the moderator on the site
Hi Thanks for the tip. I'm following the instructions on how to enlarge by using Macro, however I'm getting a error message "The type that was defined by user was ot defined" Any idea?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations