vba

  • Thread starter Thread starter KD
  • Start date Start date
K

KD

Is there any code that I can use in Excel vba to access a
PowerPoint bar chart's data labels?

Many thanks
KD
 
KD,
Some examples which would be useful: Though they deal with code that runs
within the PPT application environment. You can modify it and make it work
from Excel.

Sample VBA Code to Create a Graph
http://support.microsoft.com?scid=kb;EN-US;Q176443

PPT2000: Sample VBA Code to Create a Graph from a Text File
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q222687

VBA: How to Paste New Excel Data into an Existing Graph
http://support.microsoft.com/support/kb/articles/q267/9/74.asp

PPT2000: Sample Visual Basic Code to Update Links in a Graph Datasheet
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q222689

GRAPH2000: VBA: How to Paste New Excel Data into an Existing Graph
http://support.microsoft.com/default.aspx?scid=kb;EN-US;qQ267974

PPT2000: Sample VB Code to Retrieve the Title of a Graph
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q222739

PPT2000: Creating and Altering a Graph During a Slide Show
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q242360


--
Regards
Shyam Pillai

Handout Wizard
http://www.mvps.org/skp/how/
 
Hi Shyam

Still having problems !!
The code I have is as follows and doesn't work (it comes
up with "Run time error '438' Object doesn't support this
property or method")

dim oGraph as Object
oPPTApp.ActivePresentation.Slides(slide_number).Select
With oPPTApp.ActivePresentation.Slides(slide_number)
For Each oPPTShape In .Shapes
If oPPTShape.Type = msoEmbeddedOLEObject Then
Set oGraph = oPPTShape.OLEFormat.Object
oGraph.SeriesCollection(1).Points(1).DataLabels.Text
= "KD"
oGraph.Application.Update
End If
Next
End With

Any ideas would be most welcome !

Thanks

KD
 
Back
Top