Note: The other languages of the website are Google-translated. Back to English

Comment cliquer pour agrandir ou agrandir l'image dans un document Word?

Cet article explique comment agrandir ou développer des images dans un document Word par un clic de souris.

Cliquez pour agrandir ou agrandir l'image avec le code VBA

Redimensionner les images avec Kutools for Word


Cliquez pour agrandir ou agrandir l'image avec le code VBA

Le code VBA suivant peut aider à agrandir les images dans un document Word en un clic. Veuillez faire comme suit.

1. Dans le document contient des images que vous agrandissez d'un clic, appuyez sur la touche autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module de classe. Copiez ensuite le code VBA ci-dessous dans la fenêtre Classe.

Code VBA 1: Cliquez pour agrandir les images

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

Notes: Dans le code, le nombre 200 correspond à la hauteur et à la largeur spécifiées des images agrandies. Vous pouvez modifier la hauteur et la largeur selon vos besoins.

3. Cliquez insérer > Module, copiez le code ci-dessous dans la fenêtre Module.

Code VBA 2: Cliquez pour agrandir les images

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

4. appuie sur le F5 pour exécuter le code et fermer le Microsoft Visual Basic pour applications fenêtre.

Désormais, lorsque vous cliquez sur une image de ce fichier, l'image sera agrandie à la taille spécifique que vous souhaitez.


Redimensionner les images avec Kutools for Word

Les Redimensionner les images utilité de Kutools for Word peut vous aider à redimensionner toutes les images selon un pourcentage spécifié ou une image sélectionnée. Veuillez essayer.

Kutools for Word : Avec plus de 100 compléments Word pratiques, libre d'essayer sans limitation dans 60 jours.

Cliquez Kutools Plus > "Resize", sélectionnez un pourcentage dans la liste déroulante. Voir la capture d'écran:

Ensuite, toutes les images du document actuel sont redimensionnées en fonction de ce pourcentage spécifique.

Pour redimensionner toutes les images en fonction de la taille de l'image sélectionnée, vous devez d'abord sélectionner l'image, puis cliquer sur Kutools Plus > "Resize" > Redimensionner les images avec la sélection. Voir la capture d'écran:

Ensuite, toutes les images du document actuel sont redimensionnées en fonction de celle sélectionnée.

Si vous souhaitez avoir un essai gratuit de cet utilitaire, rendez-vous sur télécharger gratuitement le logiciel d'abord, puis appliquez l'opération selon les étapes ci-dessus.


Office Tab - Navigation, modification et gestion par onglets de plusieurs documents dans Word:

Office Tab apporte l'interface à onglets telle qu'elle apparaît dans les navigateurs Web tels que Google Chrome, les nouvelles versions d'Internet Explorer et Firefox à Microsoft Word. Il seront être un outil rapide et irremplaçable dans votre travail. Voir la démo ci-dessous:

Cliquez pour un essai gratuit d'Office Tab!


Outils de productivité Word recommandés

 

Kutools For Word - Plus de 100 fonctionnalités avancées pour Word, économisez 50% de temps

  • Les opérations compliquées et répétées peuvent être effectuées une seule fois en quelques secondes.
  • Insérez simultanément plusieurs images dans des dossiers dans un document Word.
  • Fusionner et combiner plusieurs fichiers Word dans des dossiers en un seul avec l'ordre souhaité.
  • Divisez le document actuel en documents séparés selon l'en-tête, le saut de section ou d'autres critères.
  • Convertissez des fichiers entre Doc et Docx, Docx et PDF, collection d'outils pour les conversions et la sélection courantes, etc.
Commentaires (4)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Salut. Merci pour le tuyau. Je suis les instructions sur la façon d'agrandir en utilisant Macro, mais je reçois un message d'erreur "Le type qui a été défini par l'utilisateur n'a pas été défini" Une idée ?
Ce commentaire a été minimisé par le modérateur sur le site
Hi

La macro ne fonctionne pas comme elle le devrait. Sur MS Office 365, le redimensionnement n'apparaît que pendant quelques millisecondes.
Ce commentaire a été minimisé par le modérateur sur le site
Il fonctionne dans un ancien fichier mondial, enregistré sous .doc, mais ouvert dans MS 365.
Ce commentaire a été minimisé par le modérateur sur le site
OK... après avoir cliqué pour développer, comment faites-vous pour qu'il revienne à la taille par défaut ou cliquez sur la taille par défaut ?
Il n'y a pas encore de commentaires postés ici

Nous suivre

Copyright © 2009 - www.extendoffice.com. | Tous les droits sont réservés. Alimenté par ExtendOffice. | | Plan du site
Microsoft et le logo Office sont des marques commerciales ou des marques déposées de Microsoft Corporation aux États-Unis et / ou dans d'autres pays.
Protégé par Sectigo SSL