Excel ->inserer une image dans une cellule

Résolu

joebarteamv Messages postés 65 Date d'inscription samedi 25 janvier 2003 Statut Membre Dernière intervention 5 novembre 2008 - 22 sept. 2004 à 09:44
dp_favresa Messages postés 132 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 11 mai 2010 - 22 sept. 2004 à 11:57

Bonjour,
et avt tout merci de lire!
donc mon soucis ce de mettre une image dans un document excel a partir de visual basic 6
donc ce quelqu"un a une idee ->ce cool!

A voir également:

1 réponse

Réponse 1 / 1

dp_favresa Messages postés 132 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 11 mai 2010
22 sept. 2004 à 11:57

Bonjour,

Vous pouvez vous inspirer du code ci-dessous qui insère une image
dont le nom est basé sur le contenu d'une cellule :

For Compteur = 5 To 116
Range("D" & Compteur).Select
ValCellu = ActiveCell.Value
If ValCellu > "000" Then
Image = Application.ActiveWorkbook.Path & "\Catalogue\Forme" & ValCellu & ".GIF"
Range("Y" & Compteur).Select
ActiveSheet.Pictures.Insert(Image).Select
End If
Next Compteur

Bon(ne) courage, développement, salutation...
(choisissez ce qui vous convient) dp

Discussions similaires

Afficher les liens hypertextes qui sont associés à des cellules Excel.

[vba] recopier la valeur d'une cellule dans une autre feuille.

Couleur de fond d'une cellule excel

Excel : récupérer lien hypertexte

Dernière cellule non vide d'une colonne