Hello,
I have a simple code here that creates a Chart in Excel using Access VBA:
I got this from http://support.microsoft.com/kb/142387#appliesto site.
What I wanna know is how to put the legend at the bottom with values per x-axis column?
I think others call it data table or series collection.
I want to see not only the graph but also the equivalent data based by the graph. I was thinking data can be placed along with the legend at the bottom in-line with the x-axis.
Can anyone help me on this?
I have a simple code here that creates a Chart in Excel using Access VBA:
Code:
'Start Excel and create a new workbook
Set oXL = CreateObject("Excel.application")
Set oBook = oXL.Workbooks.Add
Set oSheet = oBook.Worksheets.Item(1)
' Insert Random data into Cells for the two Series:
Randomize Now()
For iRow = 1 To cNumRows
For iCol = 1 To cNumCols
aTemp(iRow, iCol) = Int(Rnd * 50) + 1
Next iCol
Next iRow
oSheet.Range("A1").Resize(cNumRows, cNumCols).Value = aTemp
'Add a chart object to the first worksheet
Set oChart = oSheet.ChartObjects.Add(50, 40, 300, 200).Chart
oChart.SetSourceData Source:=oSheet.Range("A1").Resize(cNumRows, cNumCols)
oChart.ChartType = 51 'xlColumnClustered
oChart.HasTitle = True
oChart.ChartTitle.Text = "Chart Title Here"
' Make Excel Visible:
oXL.Visible = True
oXL.UserControl = TrueI got this from http://support.microsoft.com/kb/142387#appliesto site.
What I wanna know is how to put the legend at the bottom with values per x-axis column?
I think others call it data table or series collection.
I want to see not only the graph but also the equivalent data based by the graph. I was thinking data can be placed along with the legend at the bottom in-line with the x-axis.
Can anyone help me on this?