charts - VBA error "Method or Data Memeber Not Found..." when using .chartdata -


hopefully can help. new , big picture trying alter data on existing chart on ppt slide data excel sheet. simple problem when try create new chart error:

method or data member not found on line set gchartdata = mychart.chartdata

why .chartdata not option in vba menu following mchart? running office pro plus 2010. have ms powerpoint 14.0 object lirary reference checked. thanks

sub createchart() dim mychart chart dim gchartdata chartdata dim gworkbook excel.workbook dim gworksheet excel.worksheet  ' create chart , set reference chart data. set mychart = activepresentation.slides(1).shapes.addchart.chart set gchartdata = mychart.chartdata  ' set workbook , worksheet references. set gworkbook = gchartdata.workbook set gworksheet = gworkbook.worksheets(1)   ' add data workbook. gworksheet.listobjects("table1").resize gworksheet.range("a1:b5") gworksheet.range("table1[[#headers],[series 1]]").value = "items" gworksheet.range("a2").value = "coffee" gworksheet.range("a3").value = "soda" gworksheet.range("a4").value = "tea" gworksheet.range("a5").value = "water" gworksheet.range("b2").value = "1000" gworksheet.range("b3").value = "2500" gworksheet.range("b4").value = "4000" gworksheet.range("b5").value = "3000"  ' apply styles chart. mychart     .chartstyle = 4     .applylayout 4     .cleartomatchstyle end  ' add axis title. mychart.axes(xlvalue)     .hastitle = true     .axistitle.text = "units" end  'mychart.applydatalabels  ' clean references. set gworksheet = nothing ' gworkbook.application.quit set gworkbook = nothing set gchartdata = nothing set mychart = nothing  end sub 


Comments

Popular posts from this blog

toolbar - How to add link to user registration inside toobar in admin joomla 3 custom component -

linux - disk space limitation when creating war file -