Qualität des erstellten gif-Bildes verbessern
01.07.2002 10:58:54
nik
Ich erzeuge mit folgendem Makro ein gif-Bild. Weiss jemand von euch, wie man die Qualität verbessern bzw. einstellen kann.
Sub CreateGif(Name, savename)
Dim cht As Chart
Dim Datum
Datum = Format(Now(), "yyyy-mm-dd")
Set cht = ActiveSheet.ChartObjects(Name).Chart
cht.Export GifSpeicherort & savename & "_" & Datum & ".gif"
End Sub
Vielen Dank.