Insérer image dans cellule. {excel 2010} [Fermé]

Signaler
Messages postés
5
Date d'inscription
vendredi 10 octobre 2014
Statut
Membre
Dernière intervention
14 octobre 2014
-
Messages postés
17245
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 octobre 2020
-
Bonjour,

Je vous explique :

- j'ai une base de donnée concernant 400 personnes avec des infos personnelles, numéro de dossier, et autre sur une page de mon classeur. Elle contient aussi le lien vers une photo de la personne concernés. Cette page n'est pas visible par mes collaborateur.

-Sur une autre page, visible de mes collaborateurs, j'ai un système à base de recherchev qui me permet après avoir rentré le nom d'une des personne de concaténer l'ensemble des données afin que cela soit lisible.

-Je souhaite y rajouter la photo avec une mise en forme automatique de la taille de celle-ci afin qu'elle soit au format d'une cellule spécifiée.

Si quelqu'un est capable de m'expliquer comment faire je suis preneur

Merci d'avance.

6 réponses

Messages postés
17245
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 octobre 2020
4 286
Bonjour,

Regarde mes deux astuces avec simples formules sur ce lien

https://www.commentcamarche.net/faq/34342-excel-faire-apparaitre-une-image-sur-une-feuille-de-calcul

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 60511 internautes nous ont dit merci ce mois-ci

Messages postés
12758
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
13 octobre 2020
2 041
Bonjour Mike

Impeccable ! malheureusement le lien vers le fichier téléchargeable ne fonctionne plus

Bien cordialement
Messages postés
17245
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 octobre 2020
4 286
Re,

voila le fichier, Feuil1 et Feuil3 les formules et Feuil2 ou sont stockée les images

https://www.cjoint.com/c/DJmrX2Ku0ri

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 60511 internautes nous ont dit merci ce mois-ci

Messages postés
12758
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
13 octobre 2020
2 041
Merci
Espérons que le demandeur y trouve son bonheur

A+
Messages postés
5
Date d'inscription
vendredi 10 octobre 2014
Statut
Membre
Dernière intervention
14 octobre 2014

Marche impeccable avec la fonction décaler , par contre j'ai l'image qui ne veut pas rester au format que je lui astreint , comme l'image est stockée à un format plus petit pour éviter la lourdeur du fichier, l'image se remet a la taille d'origine et pas a celle que je lui astreint qui est un peu plus grande car la définition ne m'importe pas. Si vous avez une solution pour figer la taille qui doit être la meme quelque soit l'image ?
Messages postés
346
Date d'inscription
mardi 7 octobre 2008
Statut
Membre
Dernière intervention
2 juin 2015
106
Salam oursmili. :)

Je ne sais pas insérer une image dans une cellule mais, en contournant un peu, faisons en sorte que l'image se positionne sur la cellule désirée (A1 par exemple) et se redimensionne en conséquence, l'essentiel étant qu'elle s'affiche à l'endroit et aux dimensions voulus. Je propose donc ce code VBA :
Public Sub TailleImage()
ActiveSheet.Pictures.Insert("C:\image.bmp").Select
With Selection.ShapeRange
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top
.Height = ActiveSheet.Range("A1").Height
.Width = ActiveSheet.Range("A1").Width
End With
End Sub

:--))
Messages postés
5
Date d'inscription
vendredi 10 octobre 2014
Statut
Membre
Dernière intervention
14 octobre 2014

Je bosse dessus demain et je vous dis lundi soir si cela fonctionne.
Messages postés
17245
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 octobre 2020
4 286
Re,

Oui c'est possible de surdimensionner l'affichage mais il va falloir compléter le procédé par un complément de code en VBA
Messages postés
5
Date d'inscription
vendredi 10 octobre 2014
Statut
Membre
Dernière intervention
14 octobre 2014

Est ce que le type de code de redaiwa pourrait fonctionner ?
Messages postés
17245
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
13 octobre 2020
4 286
Re,

je n'ai pas eu le temps de revenir plus vite, mais dans la feuille 2 ou sont stocké les images, il suffit de couvrir la totalité de la cellule avec l'image, clic droit sur l'image et dans les propriétés choisir le déplacer et dimensionner avec les cellules, ensuite dans la feuille d'affichage 1 ou 3 dans l'exemple redimensionner l'image

https://www.cjoint.com/c/DJrlAjXxFBP