Fixed sized printout XY-diagram

[TopSat]

Hi there,

I'm trying to persuade Excel to print out my XY diagrams with always the same size (full letter).

First a open a full sized diagramm on the screen and ask for the values of plotarea.width and plotarea.insidewidth.

After each vhange of the content of the diagram I force plotarea.width to get the value of the startup. (Sample: plotarea.width at first call is 600. After each change before a printout I set plotarea.width=600)

This doesn't work under all conditions. Sometimes the printout is a little bit smaller or larger.

As plotarea.insidewidth is read only I change within VBA plotarea.width until plotarea.insidewidth gets the same value as with the first startup. But I still have von 100% success.

Is somebody familiar with this problem and has a hint for me?


Thanks in advance,

TopSat

 

[SkipVought]

TopSat,

Don't mess with PlotArea -- that's an area WITHIN the Chart and cannot exceed the width/height of the ChartObject.

With ActiveSheet.ChartObjects(1)
  .Width = nWidth
  .Height = nHeight
End With

Skip,
[sub]
[red]Be advised:[/red] When you ignite a firecracker in a bowl of vanilla, chocolate & strawberry ice cream, you get...
Neopolitan Blownapart! [/sub]