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 fonction insertion image

fonction insertion image

5 réponses
Avatar
Michel
Bonjour à tous,

J'ai dans des cellules une arborescence pointant sur des images (par ex:
A1=c:\mesdoc\maphoto.jpg)

Je souhaiterais avoir une fonction/formule qui me permette d'afficher cette
photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto avec
format de contrôle sur la formule


Quelqu'un à une idée ???
Signaler un problème avec ce contenu

5 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
LSteph
Bonsoir,
dans une cellule , faudra adapter , mais dans la feuille
par là, un exemple avec les jaquettes de films:
' FAQ du forum Microsoft Public Fr Excel : http://dj.joss.free.fr/faq.htm
'VBAXL Exemples de procédures Visual Basic pour Excel:
http://dj.joss.free.fr/

lSteph


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

Bonjour à tous,

J'ai dans des cellules une arborescence pointant sur des images (par ex:
A1=c:mesdocmaphoto.jpg)

Je souhaiterais avoir une fonction/formule qui me permette d'afficher
cette photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto
avec format de contrôle sur la formule


Quelqu'un à une idée ???



Avatar
Daniel.j
Bonsoir
Avec une macro on pourrait imaginer de faire:

Sub ImgSelect()
Dim nom$
Dim fichimg$
On Error Resume Next
nom = Selection.Value
fichimg = ActiveWorkbook.Path & "" & nom & ".jpg" 'L'image est dans le même dossier que le classeur
With Selection
ActiveSheet.Pictures.Insert (fichimg)
End With
End Sub

Daniel
FAQ du Forum Microsoft Public Fr Excel
http://dj.joss.free.fr/faq.htm

"Michel" a écrit dans le message de news:
| Bonjour à tous,
|
| J'ai dans des cellules une arborescence pointant sur des images (par ex:
| A1=c:mesdocmaphoto.jpg)
|
| Je souhaiterais avoir une fonction/formule qui me permette d'afficher cette
| photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto avec
| format de contrôle sur la formule
|
|
| Quelqu'un à une idée ???
|
|
Avatar
Daniel.j
Avec le chemin complet dans la cellule :

Dim nom$
On Error Resume Next
nom = Selection.Value
With Selection
ActiveSheet.Pictures.Insert (nom)
End With

Daniel
FAQ du Forum Microsoft Public Fr Excel
http://dj.joss.free.fr/faq.htm

"Michel" a écrit dans le message de news:
| Bonjour à tous,
|
| J'ai dans des cellules une arborescence pointant sur des images (par ex:
| A1=c:mesdocmaphoto.jpg)
|
| Je souhaiterais avoir une fonction/formule qui me permette d'afficher cette
| photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto avec
| format de contrôle sur la formule
|
|
| Quelqu'un à une idée ???
|
|
Avatar
Michel
Bonjour et merci pour les réponses !

Mais comment faire pour faire de cette macro une fonction ?

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

Bonjour à tous,

J'ai dans des cellules une arborescence pointant sur des images (par ex:
A1=c:mesdocmaphoto.jpg)

Je souhaiterais avoir une fonction/formule qui me permette d'afficher
cette photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto
avec format de contrôle sur la formule


Quelqu'un à une idée ???



Avatar
Gaenonius
Tu ne peux pas. Une fonction, à de très rares exceptions près, ne peut que
renvoyer un résultat. Pas modifier l'environnement de travail.

--
Gaenonius

Bonjour et merci pour les réponses !

Mais comment faire pour faire de cette macro une fonction ?

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


Bonjour à tous,

J'ai dans des cellules une arborescence pointant sur des images (par ex:
A1=c:mesdocmaphoto.jpg)

Je souhaiterais avoir une fonction/formule qui me permette d'afficher
cette photo à l'emplacement de la formule (ex: =IMG(A1) affiche maphoto
avec format de contrôle sur la formule


Quelqu'un à une idée ???