VBA vs chart
 

Hi everybody, I have a problem I don't seem to be able to solve, maybe you
can help.
The following code add a chart:

Dim objChart As ChartObject
With ActiveSheet
Set objChart = .ChartObjects.Add(Left:=100, Width:=575, Top:=75, Height:=325)
objChart.Chart.SetSourceData Source:=Sheets("Data").Range("M11:O26")
objChart.Chart.ChartType = xlXYScatterLines
With objChart.Chart
..PlotArea.Interior.ColorIndex = xlNone
..Refresh
End With
End With

Column M11:M26 contain dates and time (in the following format 13.03.2006
14:15:00). After running this code the chart is created but it only show
00:00:00 on the x axis. Anyone know why or have any tip of how to solve this?

Thanks
Paal

VBA vs chart
 

Your code works fine in Excel 2002 and Excel 2003 on my PC, ensure the date
cells are correctly formatted and not contain invalid or missing values.

--
Cheers
Nigel



"Paal" wrote in message
...
Hi everybody, I have a problem I don't seem to be able to solve, maybe you
can help.
The following code add a chart:

Dim objChart As ChartObject
With ActiveSheet
Set objChart = .ChartObjects.Add(Left:=100, Width:=575, Top:=75,
Height:=325)
objChart.Chart.SetSourceData Source:=Sheets("Data").Range("M11:O26")
objChart.Chart.ChartType = xlXYScatterLines
With objChart.Chart
.PlotArea.Interior.ColorIndex = xlNone
.Refresh
End With
End With

Column M11:M26 contain dates and time (in the following format 13.03.2006
14:15:00). After running this code the chart is created but it only show
00:00:00 on the x axis. Anyone know why or have any tip of how to solve
this?

Thanks
Paal

VBA vs chart
 

I've tried it one more time after changing the number format of the column
and it was now ok. Thanks for the tip.

Paal

"Nigel" wrote:

Your code works fine in Excel 2002 and Excel 2003 on my PC, ensure the date
cells are correctly formatted and not contain invalid or missing values.

--
Cheers
Nigel



"Paal" wrote in message
...
Hi everybody, I have a problem I don't seem to be able to solve, maybe you
can help.
The following code add a chart:

Dim objChart As ChartObject
With ActiveSheet
Set objChart = .ChartObjects.Add(Left:=100, Width:=575, Top:=75,
Height:=325)
objChart.Chart.SetSourceData Source:=Sheets("Data").Range("M11:O26")
objChart.Chart.ChartType = xlXYScatterLines
With objChart.Chart
.PlotArea.Interior.ColorIndex = xlNone
.Refresh
End With
End With

Column M11:M26 contain dates and time (in the following format 13.03.2006
14:15:00). After running this code the chart is created but it only show
00:00:00 on the x axis. Anyone know why or have any tip of how to solve
this?

Thanks
Paal