Export af diagrammer (2 problemer)
Jeg har et regneark (ca. 1½ mb) hvor jeg har ca. 10 faner med hver 2 søjlediagrammer, som jeg pusler med at kunne eksportere til billedefiler (GIF, PNG, JPG etc.). Jeg bruger på forsiden VBA koden:---
Worksheets("Diagram1").ChartObjects(1).Chart.Export Filename:="C:\diagram1a.png", FilterName:="png"
Worksheets("Diagram1").ChartObjects(2).Chart.Export Filename:="C:\diagram1b.png", FilterName:="png"
Worksheets("Diagram2").Cha... (osv. op til "Diagram10")
---
Det virker fint, MEN har 2 problemer:
1. hver gang makroen er kørt, forskubber layoutet på søjlediagrammerne sig! ??? (fx. flytter den forklarende tekst sig mere og mere til venstre, samt tekstbokse i toppen af diagrammet flytter sig nedaf).
2. Selvom diagrammerne har samme størrelse er outputfilernes størrelse (i pixels) ikke ens. Typisk 1-2 diagrammer af 20 er større (fx. 832*292 mod 703*241).
Hvordan sikre jeg at layoutet forbliver ens + hvordan sikre jeg mig at outputstørrelsen er ens ?
Win2K + Excel 2000 (SP3)