Bonjour à tous
Je ne connis rien à la programmation et sait utiliser les formules de calcul
d'excel uniquement
J'ai réalisé des fiches techniques sur excel. En rentrant manuellement un
code produit dans une cellule, toutes les infos stockées dans une base de
donnée exel dans un autre classeur s'affichent par l'intermédiaire de la
formule recherchev.
Je souhaite intégrer automatiquement la photo correspondant au produit. Je
suis démunie ! !
Je vous remercie par avance de votre aide précieuse
Bonne fêtes à tous
Les images x.jpg sont dans le répertoire du classeur:
A B 1 Nom Photo 2 Aubert 3 Bouchez 4 Droc 5 Fleury
Sub ImportImages2() ChDir ActiveWorkbook.Path Range("b2").Select Do While ActiveCell.Offset(0, -1) <> "" nf = ActiveCell.Offset(0, -1) & ".jpg" Set monimage = ActiveSheet.Pictures.Insert(nf) ActiveCell.EntireRow.RowHeight = monimage.Height + 0 ActiveCell.Offset(1, 0).Select Loop End Sub
Cordialement JB
FC
Merci JB d'avoir répondu aussi vite. J'ai essayé de travailler sur votre fichier (très intéressant) mais je n'arrive pas à reproduire les macros. Je ne sait pas comment les écrire ,les enregistrer. De plus j'ai remarqué que vos photos se collent dans des objet appelés "monimage" ou "labulle". Mais ils ne sont pas dans la liste des noms définis. Comment faites vous pour les nommer?
Je travaille sur Excel 97 et me demande si des fonctionnalitées ne sont pas bloquées.
Néanmoins avec les heures passées à décortiquer votre classeur j'ai appris plein de chose (et aussi l'étendue de mon ignorance) et vous en remercie sincèrement. Merci d'avance pour votre aide à tous
Les images x.jpg sont dans le répertoire du classeur:
A B 1 Nom Photo 2 Aubert 3 Bouchez 4 Droc 5 Fleury
Sub ImportImages2() ChDir ActiveWorkbook.Path Range("b2").Select Do While ActiveCell.Offset(0, -1) <> "" nf = ActiveCell.Offset(0, -1) & ".jpg" Set monimage = ActiveSheet.Pictures.Insert(nf) ActiveCell.EntireRow.RowHeight = monimage.Height + 0 ActiveCell.Offset(1, 0).Select Loop End Sub
Cordialement JB
Merci JB d'avoir répondu aussi vite. J'ai essayé de travailler sur votre
fichier (très intéressant) mais je n'arrive pas à reproduire les macros. Je
ne sait pas comment les écrire ,les enregistrer. De plus j'ai remarqué que
vos photos se collent dans des objet appelés "monimage" ou "labulle". Mais
ils ne sont pas dans la liste des noms définis.
Comment faites vous pour les nommer?
Je travaille sur Excel 97 et me demande si des fonctionnalitées ne sont pas
bloquées.
Néanmoins avec les heures passées à décortiquer votre classeur j'ai appris
plein de chose (et aussi l'étendue de mon ignorance) et vous en remercie
sincèrement.
Merci d'avance pour votre aide à tous
Merci JB d'avoir répondu aussi vite. J'ai essayé de travailler sur votre fichier (très intéressant) mais je n'arrive pas à reproduire les macros. Je ne sait pas comment les écrire ,les enregistrer. De plus j'ai remarqué que vos photos se collent dans des objet appelés "monimage" ou "labulle". Mais ils ne sont pas dans la liste des noms définis. Comment faites vous pour les nommer?
Je travaille sur Excel 97 et me demande si des fonctionnalitées ne sont pas bloquées.
Néanmoins avec les heures passées à décortiquer votre classeur j'ai appris plein de chose (et aussi l'étendue de mon ignorance) et vous en remercie sincèrement. Merci d'avance pour votre aide à tous
