Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Insertion image

Insertion image

6 réponses
Avatar
Guy72
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:\Mes documents\Excel\Jeux\Sudokus\Sudoku
Modèles\Fleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il possible de
la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Youky
Bonjour,
Avec la boite à outils VB faire deux controls Image
exemple sur Feuil et sur feuil2 pour la source
un clic droit sur le control Image de feuil2 et propriété voir Picture et
parcourir pour indiquer le fichier image
ensuite en macro il est facile d'indiquer...
Feuil1.Image1.Picture = Feuil2.Image1.Picture
Youky

"Guy72" a écrit dans le message de news:
u5nY2$
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:Mes documentsExcelJeuxSudokusSudoku
ModèlesFleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il possible
de la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy



Avatar
Guy72
Salut Youky
Merci de ton aide, je vais essayer mais je ne garantis rien car je n'ai
jamais fait cette manipe, je ne vois pas trop.
Cordialement
Guy

"Youky" a écrit dans le message de news:

Bonjour,
Avec la boite à outils VB faire deux controls Image
exemple sur Feuil et sur feuil2 pour la source
un clic droit sur le control Image de feuil2 et propriété voir Picture et
parcourir pour indiquer le fichier image
ensuite en macro il est facile d'indiquer...
Feuil1.Image1.Picture = Feuil2.Image1.Picture
Youky

"Guy72" a écrit dans le message de news:
u5nY2$
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:Mes documentsExcelJeuxSudokusSudoku
ModèlesFleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il possible
de la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy







Avatar
Guy72
Re salut Youky
J'ai pris la boite de contrôle/propriété/recherche image.
Je l'ai mis dans ma Feuil4.
Et comme je la veux en Feuil2 .
J'ai remplacé ma ligne par :
ActiveSheet.Pictures.Insert (Feuil4.Image1.Picture = Feuil2.Image1.Picture)
Mais ça me met en jaune la ligne que je viens de mettre.
J'en conclue que j'ai pas fait ce qu'il fallait et que je n'ai rien compris.
Peut tu me dire ce qui ne vas pas ?
Cordialement
Guy

"Youky" a écrit dans le message de news:

Bonjour,
Avec la boite à outils VB faire deux controls Image
exemple sur Feuil et sur feuil2 pour la source
un clic droit sur le control Image de feuil2 et propriété voir Picture et
parcourir pour indiquer le fichier image
ensuite en macro il est facile d'indiquer...
Feuil1.Image1.Picture = Feuil2.Image1.Picture
Youky

"Guy72" a écrit dans le message de news:
u5nY2$
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:Mes documentsExcelJeuxSudokusSudoku
ModèlesFleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il possible
de la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy







Avatar
Youky
Re;
Je crois que tu y est mal pris
Dans la boite à outils selectionne l'icone Image et ensuite trace un
rectangle dans ta Feuil4
avec le bouton gauche de la souris.
Une fois le rectangle tracé fait un clic droit dessus et va en propriétée,
ensuite click sur Picture et indique ta source
regarde aussi toutes les propiétés du control
Bonne chance Guy
Youky
"Guy72" a écrit dans le message de news:
eq%
Re salut Youky
J'ai pris la boite de contrôle/propriété/recherche image.
Je l'ai mis dans ma Feuil4.
Et comme je la veux en Feuil2 .
J'ai remplacé ma ligne par :
ActiveSheet.Pictures.Insert (Feuil4.Image1.Picture =
Feuil2.Image1.Picture)
Mais ça me met en jaune la ligne que je viens de mettre.
J'en conclue que j'ai pas fait ce qu'il fallait et que je n'ai rien
compris.
Peut tu me dire ce qui ne vas pas ?
Cordialement
Guy

"Youky" a écrit dans le message de news:

Bonjour,
Avec la boite à outils VB faire deux controls Image
exemple sur Feuil et sur feuil2 pour la source
un clic droit sur le control Image de feuil2 et propriété voir Picture et
parcourir pour indiquer le fichier image
ensuite en macro il est facile d'indiquer...
Feuil1.Image1.Picture = Feuil2.Image1.Picture
Youky

"Guy72" a écrit dans le message de news:
u5nY2$
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:Mes documentsExcelJeuxSudokusSudoku
ModèlesFleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il
possible de la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy











Avatar
Guy72
Re
Tout ça c'est bon, à part que je ne sais pas quoi mettre dans ma macro.
Cordialement
Guy

"Youky" a écrit dans le message de news:
%
Re;
Je crois que tu y est mal pris
Dans la boite à outils selectionne l'icone Image et ensuite trace un
rectangle dans ta Feuil4
avec le bouton gauche de la souris.
Une fois le rectangle tracé fait un clic droit dessus et va en propriétée,
ensuite click sur Picture et indique ta source
regarde aussi toutes les propiétés du control
Bonne chance Guy
Youky
"Guy72" a écrit dans le message de news:
eq%
Re salut Youky
J'ai pris la boite de contrôle/propriété/recherche image.
Je l'ai mis dans ma Feuil4.
Et comme je la veux en Feuil2 .
J'ai remplacé ma ligne par :
ActiveSheet.Pictures.Insert (Feuil4.Image1.Picture =
Feuil2.Image1.Picture)
Mais ça me met en jaune la ligne que je viens de mettre.
J'en conclue que j'ai pas fait ce qu'il fallait et que je n'ai rien
compris.
Peut tu me dire ce qui ne vas pas ?
Cordialement
Guy

"Youky" a écrit dans le message de news:

Bonjour,
Avec la boite à outils VB faire deux controls Image
exemple sur Feuil et sur feuil2 pour la source
un clic droit sur le control Image de feuil2 et propriété voir Picture
et parcourir pour indiquer le fichier image
ensuite en macro il est facile d'indiquer...
Feuil1.Image1.Picture = Feuil2.Image1.Picture
Youky

"Guy72" a écrit dans le message de news:
u5nY2$
Bonjour à tous
En ce moment j'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:Mes documentsExcelJeuxSudokusSudoku
ModèlesFleur.jpg" ).Select.
Si je met déjà cette image dans une page de mon classeur, est-il
possible de la faire venir comme dans la formule ci-dessus ?
A moins qu'il y est une autre solution.
La raison est que si je transfert mon fichier sur un autre
ordinateur.....problème.
Cordialement
Guy















Avatar
Youky
Lorsque tu a remplis la propriété Picture du control Image
L'image est enregistrée avec le classeur, tu peux exécuter ton fichier sur
n'importe quel autre PC
Si l'image ne change pas de place, mets le directement là ou il doit
aller...!
Pas besoin de faire 2 tracés de control Image
entre autres si en cours de jeux tu veux différente Images en Feuil1 tu les
stock en Feuil4 avec les controls Image
pour la Feuil1 un seul control Image et le code si besoin
Feuil1.Image1.Picture = Feuil4.Image1.Picture'ou Feuil4.Image2 ou Image3
Youky