Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Affichage de photo par le chemin d'accès

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

antoine0207

XLDnaute Nouveau
Bonjour,

J'ai une photo à afficher et j'ai dans une case son chemin d'acces

Je ne maitrise pas tres bien les macros d'excel mais je connais mieux la maniere d'utiliser VBA d'access

J'aimerai, à la mise a jour d'une cellule (car la cellule est remplie par access), que la photo s'affiche (si je le fait a l'ouverture de la feuille, elle ne sera pas affichée)

je ne sais pas comment créer un événement VBA à la mise a jour (peut etre une indacation ou un lien ?)

et je ne connais pas tres bien la syntaxe d'excel pour afficher une photo

Merci pour toute réponse
 
Re : Affichage de photo par le chemin d'accès

Bonjour,

C'est dommage, j'avais vu ce matin,Chris qui était sur les promenades du Forum et qui est la es Doctor en ACCESS;

Par contre, as-tu été un peu trainer dans les archives, soit en t'y rendant directement, soit en tapant dans le bouton Recherche : image chemin acces repertoire. IL me semble, mais n'étant pas très douée pour les codes, qu'il existe pas mal de fichiers ou de messages qui disent comment afficher une image d'un répertoire mais dans ton cas avec une actualisation d'access...😱 😕 ; peut-être aller voir dans le forum de Chris sur self.access si des procédures peuvent être mises en place ou alors attendre que quelqu'un qui pratique les deux (excel et access, et il y en a sur ce forum) puisse avoir le temps de se pencher sur ta question.



Dans tous les cas, fais comme moi, pratique le DIL :



ne pas Désespérer,
ne pas s'Impatienter,
ne pas Lacher


😛
 
Dernière édition:
Re : Affichage de photo par le chemin d'accès

Merci beaucoup pour ta réponse
ça remonte le moral

en fait le coté access du probleme n'est justement pas un probleme (c'est juste pour expliquer que je ne peux pas faire autrement que d'afficher la photo a partir du chemin)


je vais refouiner en recherche
 
Re : Affichage de photo par le chemin d'accès

salut antoine,

mets ce code dans le module de code de la feuille où se trouve la cellule raffraichie par Access :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.AddressLocal(False, False) = "A1" Then
        ' traitement voulu
    End If
End Sub

si tu veux plus d'explications, n'hésites pas...
 
Re : Affichage de photo par le chemin d'accès

j'ai mis le code dans
outil
macro
visual basic editor
explorateur d'objet
VBAproject
microsoft excel objets
feuil1

c'est bien ça ?

parce que j'hésite avec
VBAproject
Feuille

et
VBAproject
Module

vu que tu me parle de feuille et de module
 
Re : Affichage de photo par le chemin d'accès

apperemment c'est bon car quand je raffraichis la cellule il me dit que mon code a une erreur

reste plus qu'a coriger le code

je te remercie du fond du coeur de t'etre interressé a moi
 
Re : Affichage de photo par le chemin d'accès

mon code c'est

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.AddressLocal(False, False) = "AD2" Then
        Image1.Picture = LoadPicture(AD2)
Image1.Visible = True
    End If
End Sub


en sachant que dans AD2 j'ai le chemin de l'image
et que je veux l'afficher dans une image que j'ai crée et qui s'appelle Image1

il me dit "objet requis" et le débogueur pointe sur " Image1.Picture = LoadPicture(AD2)"
une explication ?
 
Re : Affichage de photo par le chemin d'accès

voili, voilou :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.AddressLocal(False, False) = "AD2" Then
        If Not IsEmpty(Target.Value) Then
            Image1.Picture = LoadPicture(Range("AD2").Value)
            Image1.Visible = True
        End If
    End If
End Sub
 
Re : Affichage de photo par le chemin d'accès

Merci beaucoup pour ce code, il a l'air de faire ce qu'il faut malheuresement quand je mets a jour ma cellule mon image ne bouge pas et il me dit "erreur 424 objet requis"
en pointant
Code:
Image1.Picture = LoadPicture(Range("AD2").Value)

je trouve pas ou ça coince

soit j'ai mis le code au mauvais endroit (il est dans le dossier "microsoft ecel objets") ( et donc pas dans "module" ni "feuilles")

soit il ne trouve pas image1 (objet requis ?)
mon image1 et une image que j'ai crée avec "insertion image à partir du fichier"
je l'ai ensuite renommée image1 via le cadre en haut a gauche ??

Quelqu'un voit ou je me suis trompé ?
 
Re : Affichage de photo par le chemin d'accès

vous croyez que je n'aurais pas du créé l'image comme ça ?

 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
626
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…