> Hey all,
>
> I am grabbing data from XL and inserting into existing PPT embedded sheets.
I'm not sure what "PPT embedded sheets" are. Datasheets that're part of an
MSGraph chart, I'd guess. Can you confirm that? Thanks.
> The problems is that some of the numbers are bolded in XL and so they are
> bolded when they get inserted into the MSGraph datasheet header column.
[quoted text clipped - 7 lines]
>
> but I get an error?
On what line of code and what is the exact text of the error message?
-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================
Lance Hoffmeyer - 18 Jul 2007 11:31 GMT
> I'm not sure what "PPT embedded sheets" are. Datasheets that're part of an
> MSGraph chart, I'd guess. Can you confirm that? Thanks.
Yes, datasheets that are part of an MSGraph is what I mean.
This is the line where I get the error
>> oGraph.Application.datasheet.Range(oPPTHEADERCELL).Font.Bold=False
> On what line of code and what is the exact text of the error message?
>
[quoted text clipped - 3 lines]
> PPTools: www.pptools.com
> ================================================
Steve Rindsberg - 18 Jul 2007 15:42 GMT
> > I'm not sure what "PPT embedded sheets" are. Datasheets that're part of an
> > MSGraph chart, I'd guess. Can you confirm that? Thanks.
[quoted text clipped - 6 lines]
>
> > On what line of code and what is the exact text of the error message?
It's a good idea to leave previous posts quoted, within limits, so we can refer
back to the code more easily.
========= you have ===================
oGraph = PWB.OLEFormat.Object
oGraph.Application.datasheet.Range(oPPTCELL).Value = oVALUE
oGraph.Application.datasheet.Range(oPPTHEADERCELL).Value = oHEADER
oGraph.Application.datasheet.Range(oPPTHEADERCELL).Font.Bold=False
======================================
It seems that you can only format the font for the entire data table, not for
portions of the datasheet. I haven't tested this but try:
oGraph.Application.Datasheet.Font.Bold = False
-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================