6
votes

Excellez la carte d'exportation vers WMF ou EMF?

J'essaie d'exporter un graphique d'Excel vers le format WMF ou EMF.

Le code fonctionne si vous exportez sur GIF mais pas avec WMF en tant que Filtername.

Ceci fonctionne: < / p> xxx

mais xxx

échoue à l'erreur:

Erreur de temps d'exécution '1004': Défini ou défini par l'objet Erreur
PowerPoint vous permet d'exporter vers WMF. Et j'ai "avec succès" exporté en copiant le graphique en PowerPoint et que PowerPoint exportez l'image sur WMF, mais il doit y avoir un moyen plus facile - j'espère.
Je me demande s'il y a peut-être un moyen d'inscription Le filtre WMF pour Excel mais je ne suis pas sûr comment faire cela. S'il vous plaît aider! Merci.

excel vba

1 commentaires

@Alex Andronov - a-t-il besoin d'utiliser la commande exportation? Une autre méthode permettrait-elle d'économiser le graphique d'une manière différente va bien?

4 Réponses :

0
votes

Andy a répondu à cela en détail ici .

2 commentaires

Le problème avec cette suggestion est que l'installation de la version complète du bureau n'ajoute pas le filtre WMF.

Je n'ai pas eu le temps de tester la solution d'Andy - je devais partir (d'où le retard de commentaire) Je chercherai le filtre WMF pour vous.

0
votes

Drôle Ceci, cette affiche présentait exactement le même problème sur ce Forum Ici, est tombé sur cet article intéressant à Excelforum par rapport à cela.

J'espère que cela vous aide, Meilleures salutations, Tom.

0 commentaires

9
votes

cette copie, la méthode de sauvegarde a fonctionné pour moi, strong> Je l'ai mis en 3 sections (déclarations, enregistre la fonction EMF et la section de sélection de sélection / copie / fonction):

* J'ai trouvé Cet article détaillant comment enregistrer sur EMF puis le doctaut un peu d'utiliser un activechart au lieu d'un Sélection arbitraire. P>

Tout d'abord quelques déclarations: P>

Sub SaveIt()
Charts.Add
    ActiveChart.ChartArea.Select
    Selection.Copy
    If fnSaveAsEMF("C:\Excel001.emf") Then
        MsgBox "Saved", vbInformation
    Else
        MsgBox "NOT Saved!", vbCritical
    End If

End Sub

1 commentaires

J'ai trouvé que votre réponse a l'air vraiment prometteuse, mais je ne pouvais pas reproduire l'exportation de cartes au format * .emf. Je reçois un message non sauvegardé sans autre idée pourquoi il refuse de travailler. Tout ce que j'ai fait était d'ajouter "ptrsafe" entre ... DÉCLARER LA FONCTION. Qu'est-ce que j'ai oublié?

1
votes

via Cette entrée de forum < / a> Vous pouvez trouver la merveilleuse Page Excel de Stephen Bullen et téléchargez le < un href = "http://www.bmsltd.co.uk/dlcount/dlcount.asp?file=pasepicture.zip" rel = "Nofollow Noreferrer"> Utilitaire de pâte à pâte qui montre comment vous pouvez exporter vers le WMF format.

Il copie essentiellement le graphique, la colle dans le presse-papiers comme une image et enregistre son contenu dans un fichier WMF dans quelques lignes de code.

0 commentaires