excel diagramme in ppt exportieren
17.10.2005 16:53:00
maik
ich möchte gerne ein excel-diagramme als erweiterte metadatei via makro in powerpoint exportieren. falls dies zu kompliziert ist tut es auch schon ein makro, weches die diagramme als .emf - dateien abspeichert.
für .jpg und .gif dateien habe ich folgendes makro gefunden (könnte man da zb irgendwie an .emf dateien anpassen?)
Sub DiagrammAlsGifSpeichern()
Dim GDiagramm As Chart
Dim NameT As String
Const PfadDiagramm = "C:\temp\"
Set GDiagramm = ActiveChart
NameT = InputBox("Name der Datei:", "Export Chart", ActiveChart.Name)
If NameT <> "" Then
GDiagramm.Export Filename:=PfadDiagramm & NameT & ".GIF", FilterName:="GIF"
End If
End Sub
vielen dank!
maik
Anzeige