Discussion :

[ankoubzh]

Bonjour,
Même si j'ai l'impression que pas grand monde ne semble fan de la librairie OWC10, je tente quand même...

Je cherche à exporter en .jpg un graphique que j'affiche dans un userform. J'utilise donc la méthode Exportpicture, avec le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
private sub export_picture_click()
 
' test pour vérifier qu'il y a bien un graphique d'affiché, mis à un dans la procédure d'affichage du graphique
if vchart_ok = 0 then
     msgbox "No graphic displayed", vbokonly, "error"
     exit sub
end if
 
dim name as string
name = "test"
 
chartspace1.exportpicture name & ".jpg", "jpg", -1, -1
 
end sub

Le code est pas trop compliqué, et en plus cela fonctionne...une fois sur x, avec x variable totalement aléatoire !
Au delà du fait que j'ai du mal à concevoir qu'une macro ne fonctionne que de manière aléatoire, y'aurait-il un problème dans mon code, où dois-je chercher ailleurs que dans cette macro ?
Merci de vos conseils

[ankoubzh]

Bon et ben comme d'hab' sur OWC10, je vais répondre à ma question !
Je ne sais pas pourquoi cela fonctionnait de manière aléatoire, mais en mettant plutôt :

Code :

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

Me.chartspace1.exportpicture thisworbook.path & name & ".jpg", "'jpg", -1, -1

cela fonctionne à tous les coups !