Bonjour,
Je tente depuis pas mal de temps de convertir une image que j'ai dans un fichier Excel en type binary. J'ai fait un test avec un fichier jpg présent sur mon disque dur de la manière suivante:
J'aimerais maintenant remplacé le jpg pcotest par une image de mon fichier Excel que j'ai réussi a retrouvé en utilisant l'objet shape. Mon image est de type msopicture. Malheureusement, je n'ai pas réussi et je n'ai trouvé aucune information sur aucun forum qui couvrirait ce sujet.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 ImgFile = "c:\pcotest.jpg" intFile = FreeFile Open ImgFile For Binary As #intFile ImgLen = LOF(intFile) ReDim ImgBuff(ImgLen) As Byte Get #intFile, , ImgBuff() Close #intFile
Quelqu'un peut-il m'aider ?
Pascal
Partager