Discussion :

[Sebastien_INR59]

Bonjour,

J'aimerais insérer une image dans une feuille Excel à partir d'une procédure sous Access.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
    Dim objFeuille As Worksheet
    Dim objPict As Picture
 
    Set objFeuille = ActiveSheet
    Set objPict = objFeuille.Pictures.Insert(CurrentProject.Path & "\FeuOrange.bmp")
    With objPict
        .Left = Range("F5").Left
        .Top = Range("F5").Top
    End With

Cependant j'ai une erreur : incompatibilité de type.

[polo(31)]

vérifie que le format de ton *.bmp soit correct.

sinon je ne peut pas t'aidé désolé

[Sebastien_INR59]

Le format est bien correct

C'est bien un .bmp

[Arkham46]

bjr,

Cependant j'ai une erreur : incompatibilité de type.

oui mais sur quelle ligne?

sinon les ranges ne sont pas terribles tout seuls comme ça, tu ne précises pas sur quelle feuille tu travailles

Code :

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

objFeuille.Range("F5").Left

ça peut éviter quelques soucis

[polo(31)]

sinon les ranges ne sont pas terribles tout seuls comme ça, tu ne précises pas sur quelle feuille tu travailles

Code :

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

objFeuille.Range("F5").Left

ça peut éviter quelques soucis

il ne le considére pas par défaut?

[Arkham46]

il ne le considére pas par défaut?

si généralement ça marche mais les trucs par défaut c'est souvent sujet à des erreurs
et ça laisse des objets non libérés qui bloque le process excel après

[polo(31)]

avec du recul, cela doit aussi influencé sur le portage de l'appli!