Famille de feuilles de calcul Microsoft avec des outils pour l’analyse, le graphique et la communication des données.
Avertissement : veuillez noter que les informations fournies ont été traduites à l'aide d'outils de traduction automatique. Bien que nous nous efforcions d'assurer l'exactitude des traductions, celles-ci peuvent ne pas refléter parfaitement le sens, le contexte ou l'intention d'origine du contenu source.
Bonjour Michel Mariaccia
Le message affiché correspond à une erreur d’exécution, et non à une erreur de compilation.
Puisque le problème est apparu après une mise à jour d’Excel, essayez d’abord d’exporter le graphique vers le dossier temporaire local de Windows :
Dim FichierTemporaire As String
Dim ExportOK As Boolean
FichierTemporaire = Environ$("TEMP") & "\Temp.gif"
DoEvents
ExportOK = ActiveChart.Export( _
Filename:=FichierTemporaire, _
FilterName:="GIF")
If Not ExportOK Then
MsgBox "Le graphique n’a pas pu être exporté."
End If
Vérifiez également les points suivants :
- Assurez-vous qu’un graphique est bien actif lorsque la macro s’exécute.
- Supprimez tout fichier
Temp.gifexistant avant de refaire le test, car il pourrait être verrouillé. - Exportez vers le dossier temporaire local plutôt que vers un emplacement réseau, OneDrive ou SharePoint.
- Essayez le format
PNGavec une extension.pngafin de déterminer si le problème concerne uniquement le filtre GIF. - Testez la macro avec un graphique simple dans un nouveau classeur.
Si l’erreur se produit également dans un nouveau classeur lors d’un export local, indiquez la version et le numéro de build d’Excel affichés sous Fichier > Compte > À propos d’Excel. Cela permettra de vérifier si le comportement est lié à la mise à jour récemment installée.
J’espère que ces tests vous aideront à identifier la cause du problème. N’hésitez pas à nous faire part des résultats.