Macro vb Insérer des images d'un dossier
Résolu
Jerome59
-
ed555 Messages postés 63 Statut Membre -
ed555 Messages postés 63 Statut Membre -
Bonjour,
je souhaiterais une macro dans Excel pour insérer sur la feuille les images d'un dossier, en ayant indiqué auparavant dans un inputbox le chemin du dossier en question.
Ca c'est mon souci principale.
Mon autre soucis, c'est une macro pour modifier la résolution des images importées (afin que mon fichier excel ne pèse pas des tonnes)
Merci !
je souhaiterais une macro dans Excel pour insérer sur la feuille les images d'un dossier, en ayant indiqué auparavant dans un inputbox le chemin du dossier en question.
Ca c'est mon souci principale.
Mon autre soucis, c'est une macro pour modifier la résolution des images importées (afin que mon fichier excel ne pèse pas des tonnes)
Merci !
A voir également:
- Excel vba comment afficher des images provenant d'un dossier
- Dossier appdata - Guide
- Afficher taille dossier windows - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Impossible de supprimer un dossier - Guide
1 réponse
salut,
utilise le code ci-dessous :
'insérer l'image à partir de son adresse sur l'ordinateur
ActiveSheet.Pictures.Insert("C:\Users\...\pyBar.jpg")
'sélectionner l'image
ActiveSheet.Shapes("pyBar").Select
'changer le nom
Selection.Name = "je change le nom"
il te faut néanmoins connaître le nom des images à insérer avec cette méthode...
utilise le code ci-dessous :
'insérer l'image à partir de son adresse sur l'ordinateur
ActiveSheet.Pictures.Insert("C:\Users\...\pyBar.jpg")
'sélectionner l'image
ActiveSheet.Shapes("pyBar").Select
'changer le nom
Selection.Name = "je change le nom"
il te faut néanmoins connaître le nom des images à insérer avec cette méthode...