Dans cet article, nous nous concentrerons sur la démonstration de 4 façons de masquer ou d'afficher par lots des images dans votre document Word.
De temps en temps, vous êtes susceptible d'hériter d'un document avec une grande quantité d'images. Pourtant, vous les trouvez peut-être assez distrayants. En fait, ils vous empêchent de lire efficacement plutôt que d'être illustratifs. Ou si une image est une prise de textes ou de données, vous aurez du mal à distinguer l'image et le contenu du document.
Masquer les images par lot
Pour réduire les perturbations et augmenter la vitesse de navigation, vous pouvez utiliser les méthodes suivantes pour les masquer une fois pour toutes.
Méthode 1 : Modifier avec les paramètres de Word
Voici un exemple de fichier avec 2 photos. Le premier est en style d'habillage "Inline with text" tandis que l'autre est en "Tight".
- Tout d'abord, ouvrez Word et cliquez sur l'onglet "Fichier".
- Cliquez ensuite sur "Options" pour déclencher la boîte de dialogue "Options Word".
- Cliquez sur «Avancé».
- Ensuite, faites défiler jusqu'à la partie "Afficher le contenu du document". Cochez la case "Afficher les espaces réservés pour les images" et décochez la case "Afficher les dessins et les zones de texte à l'écran".
- Enfin, cliquez sur "OK".
Maintenant, vous pouvez voir que l'image dans le style "Aligné avec le texte" est convertie en une zone de cadre, et la seconde est totalement masquée.
Méthode 2 : exécuter la macro
- À start avec, cliquez sur l'onglet "Développeur" puis sur "Visual Basic" pour ouvrir l'éditeur VBA. Une autre méthode consiste à appuyer sur "Alt + F11".
- Cliquez ensuite sur le projet « Normal » puis sur « Insérer ».
- Choisissez ensuite "Module" pour obtenir un nouveau module.
- Double-cliquez dessus et collez les codes suivants :
Sub HideAllPictures()
Dim nResponse As Integer
nResponse = MsgBox("Do you want to hide all pictures?", 4, "Hide pictures")
If nResponse = 6 Then
With ActiveWindow.View
If .ShowPicturePlaceHolders = False Or .ShowDrawings = True Then
.ShowPicturePlaceHolders = True
.ShowDrawings = False
Else
MsgBox ("All pictures have been hided.")
End If
End With
End If
End Sub
- N'oubliez jamais de cliquer sur "Exécuter".
- Maintenant, il y aura une boîte de message. Cliquez sur "Oui" pour masquer toutes les images par lot.
Si vous recevez régulièrement des documents contenant plusieurs images, vous pouvez également envisager de remplacer "Sub HideAllPictures()" par "Sub AutoOpen". Ensuite, à l'avenir, lorsque vous ouvrirez un fichier contenant des images, la macro s'exécutera automatiquement.
Images d'exposition de lots
Méthode 1 : Annuler les modifications dans Word
- Utilisez la même méthode pour ouvrir d'abord la boîte de dialogue "Options Word".
- De même, cliquez sur "Avancé". Seulement cette fois, vous décochez la case "Afficher les espaces réservés pour les images" et cochez la case "Afficher les dessins et les zones de texte à l'écran".
- Enfin, cliquez sur «OK».
Méthode 2 : exécuter les codes VBA
- Répétez les 4 premières étapes de « Exécuter la macro » ci-dessus.
- Mais remplacez les codes par le beuglement :
Sub ShowAllPictures()
Dim nResponse As Integer
nResponse = MsgBox("Do you want to show all pictures?", 4, "Show pictures")
If nResponse = 6 Then
With ActiveWindow.View
If .ShowPicturePlaceHolders = True Or .ShowDrawings = False Then
.ShowPicturePlaceHolders = False
.ShowDrawings = True
Else
MsgBox ("No picture is hided.")
End If
End With
End If
End Sub
- Appuyez sur le bouton "Exécuter".
- Dans la boîte de message qui s'affiche, cliquez sur "Oui" pour start montrant toutes les images.
Étant donné que le masquage de toutes les actions d'images peut affecter tous les fichiers futurs, vous pouvez modifier le "Sub ShowAlPictures ()" en "Sub AutoClose ()". Ensuite, chaque fois que vous fermez le document, il vous rappellera d'afficher les images cachées.
Gérer les problèmes de mots
Pas de logiciel si infaillible. Et celui most d'entre nous utilisent tous les jours, Word, est également susceptible d'erreurs et de corrompre nos fichiers. Bien sûr, rien de tout cela ne sera un problème si vous possédez des sauvegardes régulières. D'autre part, si vous ne le faites pas, un prééminent Outil de correction de corruption de mots c'est ce qui aide.
Introduction de l'auteur:
Vera Chen est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris Outil de réparation de données Excel xlsx et pdf réparer les produits logiciels. Pour plus d'informations, visitez www.datanumen.com








