Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.charting
|
|||
|
|||
Please help w/ putting dates on x-axis with .XValues.
hi,
i'm trying to create charts and add series using VBA and reading from cells from a different worksheet in the workbook. I have it all figured out, but when i try and read the dates from the cells using this: Sheet8.Range(Sheet8.Cells(2, 2), Sheet8.Cells(2, 18)) or this: Sheet8.Range(Sheet8.Cells(FirstColumn, FirstRow), Sheet8.Cells(FirstColumn, LastRow)), i get dates that are all over the place and look more like julian dates, but when i use this: .XValues = Sheet8.Range("B2:B18"), it works fine. Could someone please tell me what the issue is with this and a workaround if you know of one. My example is below. Thanks, Lee Holsenbeck 'Hard code the column value for the Y axis YColumn = "6" 'Add a series ChtObj.Chart.SeriesCollection.NewSeries With ChtObj.Chart.SeriesCollection(1) 'Get the Y axis values from worksheet 8 .Values = Sheet8.Range(Sheet8.Cells(FirstRow, YColumn), Sheet8.Cells(LastRow, YColumn)) 'Sample Y axis values '.Values = Sheet8.Range(Sheet8.Cells(2, 6), Sheet8.Cells(18, 6)) 'Get the X axis values from worksheet 8 .XValues = Sheet8.Range(Sheet8.Cells(FirstColumn, FirstRow), Sheet8.Cells(FirstColumn, LastRow)) 'Sample x axis values '.XValues = Sheet8.Range(Sheet8.Cells(2, 2), Sheet8.Cells(2, 18)) '.XValues = Sheet8.Range("B2:B18") .Interior.ColorIndex = 3 .Border.ColorIndex = 3 .Name = "Gross Oil/Cond" End With |
#2
Posted to microsoft.public.excel.charting
|
|||
|
|||
Please help w/ putting dates on x-axis with .XValues.
This simple test in the Immediate Window worked for me:
activechart.seriescollection(1).xvalues = activesheet.range(activesheet.cells(5,4),activeshe et.cells(11,4)) This is the same syntax that didn't work in your example. - Jon ------- Jon Peltier, Microsoft Excel MVP Peltier Technical Services Tutorials and Custom Solutions http://PeltierTech.com/ _______ "Lee Holsenbeck" wrote in message ... hi, i'm trying to create charts and add series using VBA and reading from cells from a different worksheet in the workbook. I have it all figured out, but when i try and read the dates from the cells using this: Sheet8.Range(Sheet8.Cells(2, 2), Sheet8.Cells(2, 18)) or this: Sheet8.Range(Sheet8.Cells(FirstColumn, FirstRow), Sheet8.Cells(FirstColumn, LastRow)), i get dates that are all over the place and look more like julian dates, but when i use this: .XValues = Sheet8.Range("B2:B18"), it works fine. Could someone please tell me what the issue is with this and a wor - Jon ------- Jon Peltier, Microsoft Excel MVP Peltier Technical Services Tutorials and Custom Solutions http://PeltierTech.com/ _______ und if you know of one. My example is below. Thanks, Lee Holsenbeck 'Hard code the column value for the Y axis YColumn = "6" 'Add a series ChtObj.Chart.SeriesCollection.NewSeries With ChtObj.Chart.SeriesCollection(1) 'Get the Y axis values from worksheet 8 .Values = Sheet8.Range(Sheet8.Cells(FirstRow, YColumn), Sheet8.Cells(LastRow, YColumn)) 'Sample Y axis values '.Values = Sheet8.Range(Sheet8.Cells(2, 6), Sheet8.Cells(18, 6)) 'Get the X axis values from worksheet 8 .XValues = Sheet8.Range(Sheet8.Cells(FirstColumn, FirstRow), Sheet8.Cells(FirstColumn, LastRow)) 'Sample x axis values '.XValues = Sheet8.Range(Sheet8.Cells(2, 2), Sheet8.Cells(2, 18)) '.XValues = Sheet8.Range("B2:B18") .Interior.ColorIndex = 3 .Border.ColorIndex = 3 .Name = "Gross Oil/Cond" End With |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Value (Y) axis crosses between dates | Charts and Charting in Excel | |||
line graph-need to pick up dates as values for the x axis? | Charts and Charting in Excel | |||
Variable dates on X axis evenly spaced (should not be) | Charts and Charting in Excel | |||
Formatting dates on x axis of chart...! | Excel Discussion (Misc queries) | |||
grouping dates by week/month/etc. on cat. axis | Charts and Charting in Excel |