Hi.

I have a strange problem in a VB-macro, trying to specify the plot area on a
chart.

If I step through the code, everything works aps intended, and afterwards
pl1 = pl, pw2 = pw and ph1 = ph.

If I let the code run without interruption, the plot area is not set
corrctly, and pl1 < pl, pw2 < pw and ph1 < ph afterwards.
The values of pl, ph and pw are correct.

That is the problem?

pl = Int(chartlengde * 0.05)
ph = Int(charthoyde * 0.7)
pw = Int(chartlengde * 0.9)
Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Top = 16
Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Left = pl
Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Height = ph
Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Width = pw
Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Interior.ColorIndex =
xlNone
pl1 = Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Left
pw1 = Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Width
ph1 = Sheets(ark).ChartObjects("Chart 1").Chart.PlotArea.Height

Best regards

Einar Værnes