Discussion :

[GBAGO]

Bonjour à tous,

J'ai écrit un programme en VB sous Excel 2003 qui me permettait de faire une modification des caractérisques des images. Je veux l'exécuter sous Excel 2007 mais le programme me génère une erreur de bibliothèque inconnue.
Voici le code du programme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Sub redimensionnerImage()
    Dim Img As WIA.ImageFile, IP As WIA.ImageProcess
    Set Img = CreateObject("WIA.ImageFile")
    Set IP = CreateObject("WIA.ImageProcess")
    Img.LoadFile ("D:\image\photo.JPG")
    IP.Filters.Add IP.FilterInfos("Scale").FilterID
    IP.Filters(1).Properties("MaximumWidth") = 2500
    IP.Filters(1).Properties("MaximumHeight") = 2500
    Set Img = IP.Apply(Img)
    Img.SaveFile "D:\image1\photo.JPG"
End Sub

L'erreur concerne les bibliothèques ImageFiles, ImageProcess qui n'existeraient pas à partir de Office 2007.

Merci d'avance de votre apport.

[mapeh]

Bonjour,

une piste ICI

Si cela peut t'aider

Bon dimanche

[palgaz]

voila il te faut la bibliothèque WIA qui gére les images ,elle est téléchargeable depuis http://www.microsoft.com/downloads/d...DisplayLang=en
suit les instructions du fichiers read me pour l'installation

[mercatog]

System Requirements

* Supported Operating Systems: Windows XP

Windows Image Acquisition Automation Library v2.0 is only supported on Windows XP with Service Pack 1 installed.

[GBAGO]

Bonjour à tous,

J'ai pu télécharger le composant et l'intégrer dans les références (bibliothèques). Mais un autre message d'erreur apparaît:

Erreur d'exécution -2147024894(800700002):
erreur Automation

Merci de vos propositions.

Cordialement,