Create a chart from Excel VBA to PowerPoint and link the source to a specific table in Excel -

i to:

create chart in powerpoint vba excel link data source range have in excel file or replace worksheet powerpoint store data source data

i beginner in vba (one week trying learn)

i this:

dim chartdatarange excel.range dim myworksheet worksheet set chartdatarange = excel.range("chart_data_range") dim chartrelativeperfbox powerpoint.shape  'now open powerpoint dim pptapp new powerpoint.application  'keep visible because need see , able save pptapp.visible = true  'tell vba financialslide powerpoint presentation dim financialslide powerpoint.presentation  'add new presentation set financialslide = pptapp.presentations.add  'tell vba firstslide powerpoint slide dim slide1 powerpoint.slide  'create first slide set slide1 = financialslide.slides.add(1,powerpoint.ppslidelayout.pplayoutblank)  set chartrelativeperfbox = slide1.shapes.addchart( _     type:=xlline, _     left:=application.centimeterstopoints(12.95), _     top:=application.centimeterstopoints(12.6), _     width:=application.centimeterstopoints(11.45), _     height:=application.centimeterstopoints(5.5)) set myworksheet = chartrelativeperfbox.chart.chartdata.workbook.worksheet(1)  'replace data source in worksheet desired data application.displayalerts = false 'copy desired data chartdatarange.copy 'paste them in chart worksheet myworksheet.range("a1").pastespecial (xlpastevaluesandnumberformats) 'delete columns in worksheet myworksheet.columns("d:e").select selection.delete 'resize used range myworksheet.listobjects("table1").resize myworksheet.usedrange application.displayalerts = true 

i tried use:

set chartrelativeperfbox.setsourcedata( _ source:= chartdatarange, _ plotby:= xlline) 

but doesn't work. guess?

my previous code works slow..

as work-around doing in vba, have thought using linked objects excel powerpoint?

you can create graph in workbook, , copy graph , paste powerpoint doing following:

1. powerpoint -> home ribbon -> clipboard.
2. click drop down arrow -> paste special.
3. click 'paste link'.
4. click ok.

you have chart linked chart in workbook. update whenever manually refresh chart (right click -> update link) or when open powerpoint presentation.

documentation can found on office website.