Insérer une image à un endroit précis d'une feuille excel vba [Résolu/Fermé]
Signaler
Stellou la rebelle
Stellou la rebelle
- Messages postés
- 20
- Date d'inscription
- vendredi 14 juin 2013
- Statut
- Membre
- Dernière intervention
- 23 juillet 2013
Stellou la rebelle
- Messages postés
- 20
- Date d'inscription
- vendredi 14 juin 2013
- Statut
- Membre
- Dernière intervention
- 23 juillet 2013
A voir également:
- Vba inserer image
- Insérer une image vba - Meilleures réponses
- Insérer une image à un endroit précis d'une feuille excel vba ✓ - Forum - VB / VBA
- Ouvrir des images à un endroit précis ✓ - Forum - Webmaster
- Insérer une ligne dans une feuille excel vba ✓ - Forum - VB / VBA
- Insérer une image dans un pdf ✓ - Forum - Graphisme
- Insérer une photo dans un document PDF - Conseils pratiques - PDF
4 réponses
Patrice33740
- Messages postés
- 8435
- Date d'inscription
- dimanche 13 juin 2010
- Statut
- Membre
- Dernière intervention
- 20 février 2021
Bonjour,
Tout simplement :
Tout simplement :
Sub t() Feuil1.ChartObjects(1).Copy Range("N10").Select Pictures.Paste End Sub
Stellou la rebelle
- Messages postés
- 20
- Date d'inscription
- vendredi 14 juin 2013
- Statut
- Membre
- Dernière intervention
- 23 juillet 2013
Merci Patrice ! je vais bidouiller ! :)
Stellou la rebelle
- Messages postés
- 20
- Date d'inscription
- vendredi 14 juin 2013
- Statut
- Membre
- Dernière intervention
- 23 juillet 2013
J'ai une question :
Ta première ligne prend l'image qui a été collé,
Après tu selectionne la case désiré
et enfin tu colle l'image à cet endroit
C'est ça ?
Si je ne me suis pas trompée, je ne comprends pas comment il fait le lien avec l'image du graph que j'ai enregistré dans la première partie de mon code pour l'insérer.
Est ce que tu pourrais m'expliquer ?
Encore merci
Ta première ligne prend l'image qui a été collé,
Après tu selectionne la case désiré
et enfin tu colle l'image à cet endroit
C'est ça ?
Si je ne me suis pas trompée, je ne comprends pas comment il fait le lien avec l'image du graph que j'ai enregistré dans la première partie de mon code pour l'insérer.
Est ce que tu pourrais m'expliquer ?
Encore merci
Stellou la rebelle
- Messages postés
- 20
- Date d'inscription
- vendredi 14 juin 2013
- Statut
- Membre
- Dernière intervention
- 23 juillet 2013
Voici mon code qui marche ! hiaaaa
Dim nomImage As String
Dim Grph As ChartObject
nomImage = "C:\Users\Estelle\Desktop\Image34.gif"
Sheets("dessin planant").Activate
Set Grph = ActiveSheet.ChartObjects("Graphique 23")
'Exporte le graphique au format image GIF
Grph.Chart.Export nomImage, "GIF"
Sheets("planante").Activate
Range("G47").Select
Pictures.Insert(nomImage).Select
En plus de ma question précédent, je voudrais attribuer un nom à l'image de mon graph ! Changer sa caption? Tu sais comment on fait ?
Dim nomImage As String
Dim Grph As ChartObject
nomImage = "C:\Users\Estelle\Desktop\Image34.gif"
Sheets("dessin planant").Activate
Set Grph = ActiveSheet.ChartObjects("Graphique 23")
'Exporte le graphique au format image GIF
Grph.Chart.Export nomImage, "GIF"
Sheets("planante").Activate
Range("G47").Select
Pictures.Insert(nomImage).Select
En plus de ma question précédent, je voudrais attribuer un nom à l'image de mon graph ! Changer sa caption? Tu sais comment on fait ?