Hi,

I wrote a macro to pull data from a file in a folder into a spreadsheet. Then that data is displayed on a pre made chart. When I try to print that chart a portion of the line has the area under it shaded.

The only macro that effects the chart is a simple one that allows me to change the charts x/y axis ranges.

Below are the pictures that will help explain my problem.


SCREENPROBLEM.jpg

PROBLEM.jpg


Here is the only code that directly effects the chart:

Sub ChartRanger()

YAXISMAX = Sheets("GraphData").Range("L2")
YAXISMIN = Sheets("GraphData").Range("L1")
XAXISMAX = Sheets("GraphData").Range("N2")
XAXISMIN = Sheets("GraphData").Range("N1")


ActiveSheet.ChartObjects("Chart 2").Activate
ActiveChart.Axes(xlValue).MinimumScale = YAXISMIN
ActiveChart.Axes(xlValue).MaximumScale = YAXISMAX
ActiveChart.Axes(xlCategory).MinimumScale = XAXISMIN
ActiveChart.Axes(xlCategory).MaximumScale = XAXISMAX


End Sub


Thanks for any help!,
James