Insérer une image à un endroit précis d'une feuille excel vba
Résolu/Fermé
Stellou la rebelle
Messages postés
20
Date d'inscription
vendredi 14 juin 2013
Statut
Membre
Dernière intervention
23 juillet 2013
-
17 juin 2013 à 15:01
Stellou la rebelle Messages postés 20 Date d'inscription vendredi 14 juin 2013 Statut Membre Dernière intervention 23 juillet 2013 - 18 juin 2013 à 13:54
Stellou la rebelle Messages postés 20 Date d'inscription vendredi 14 juin 2013 Statut Membre Dernière intervention 23 juillet 2013 - 18 juin 2013 à 13:54
A voir également:
- Insérer une image à un endroit précis d'une feuille excel vba
- Insérer une vidéo sur powerpoint - Guide
- Insérer liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Calculer une moyenne sur excel - Guide
4 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 juin 2013 à 17:52
17 juin 2013 à 17:52
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
18 juin 2013 à 08:54
18 juin 2013 à 08:54
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
18 juin 2013 à 09:06
18 juin 2013 à 09:06
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
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
18 juin 2013 à 11:28
18 juin 2013 à 11:28
Il n'y a pas besoin d'enregistrer l'image,
la première ligne copie le graphe (pas l'image).
Patrice
la première ligne copie le graphe (pas l'image).
Patrice
Stellou la rebelle
Messages postés
20
Date d'inscription
vendredi 14 juin 2013
Statut
Membre
Dernière intervention
23 juillet 2013
18 juin 2013 à 13:54
18 juin 2013 à 13:54
Merci !
Stellou la rebelle
Messages postés
20
Date d'inscription
vendredi 14 juin 2013
Statut
Membre
Dernière intervention
23 juillet 2013
18 juin 2013 à 09:24
18 juin 2013 à 09:24
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 ?