Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Identify excel embedded charts in powerpoint
Hello,
I would like to identify vith a VBA code, if the chart that i am editing is is embedded in a powerpoint presentation or if is just an excel file opened by excel. My point is to fix the color chart bugs between 2003 and 2007 powerpoint version. I would like to reset the color index, if Ia m editing an Excel chart from powerpoint (wich bugs) I have tryed the workbook.container property, but it does not work when you edit a chart in Excel (I don't understand the purpose of this excel function that dies not work in excel ,,,) Any idea ?? Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Identify excel embedded charts in powerpoint
If you only need to know if the Workbook is embedded is to check its
IsInPlace property, False if opened in Excel otherwise True. If you need to know the name of the parent app check the wb's Container name (under an error handler 'cos it'll error in Excel). With both methods, if you need to know in the wb's open event postpone and check in an OnTime macro called from the open event. b = wb.IsInPlace On error resume next s = wb.Container.Name On error got to 0 If len(s) then etc Regards, Peter T "Nicolo" wrote in message ... Hello, I would like to identify vith a VBA code, if the chart that i am editing is is embedded in a powerpoint presentation or if is just an excel file opened by excel. My point is to fix the color chart bugs between 2003 and 2007 powerpoint version. I would like to reset the color index, if Ia m editing an Excel chart from powerpoint (wich bugs) I have tryed the workbook.container property, but it does not work when you edit a chart in Excel (I don't understand the purpose of this excel function that dies not work in excel ,,,) Any idea ?? Thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Identify excel embedded charts in powerpoint
Thanks Peter.
the is in place works fine. but the container errors as in Excel but I'll do it with is in place only. Other question. Do you know how I could launch a Sub every time a new workbook is open. I have included this scipt in the auto open section of an add-in. I can identify the cases when i need to launch my sub that changes the color index / color theme (necessary only when I display an excel graph embedded in Powerpoint) If I include directly my sub in the auto open (which includes activeworkbook.colors...), it does not work, because when the add in is loaded, there is not yet any active book.... IS there a way to put in a single addin a sub that will be lauched every time a new workbook is opened or created ?? "Peter T" wrote: If you only need to know if the Workbook is embedded is to check its IsInPlace property, False if opened in Excel otherwise True. If you need to know the name of the parent app check the wb's Container name (under an error handler 'cos it'll error in Excel). With both methods, if you need to know in the wb's open event postpone and check in an OnTime macro called from the open event. b = wb.IsInPlace On error resume next s = wb.Container.Name On error got to 0 If len(s) then etc |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Identify excel embedded charts in powerpoint
As I mentioned previously it's best to postpone open event code until
everything is in-place! You can do this with an onetime macro like this - Sub auto_open() Application.OnTime Now + TimeSerial(0, 0, 2), "MyAfterOpenMacro" End Sub Sub MyAfterOpenMacro() Dim wb As Workbook MsgBox "MyAfterOpenMacro" Set wb = ThisWorkbook If wb.IsInplace Then ' do stuff End If End Sub You might not need the two second delay in the above example as the Ontime macro will fire when all else is done, in a manor of speaking. Regards, Peter T "Nicolo" wrote in message ... Thanks Peter. the is in place works fine. but the container errors as in Excel but I'll do it with is in place only. Other question. Do you know how I could launch a Sub every time a new workbook is open. I have included this scipt in the auto open section of an add-in. I can identify the cases when i need to launch my sub that changes the color index / color theme (necessary only when I display an excel graph embedded in Powerpoint) If I include directly my sub in the auto open (which includes activeworkbook.colors...), it does not work, because when the add in is loaded, there is not yet any active book.... IS there a way to put in a single addin a sub that will be lauched every time a new workbook is opened or created ?? "Peter T" wrote: If you only need to know if the Workbook is embedded is to check its IsInPlace property, False if opened in Excel otherwise True. If you need to know the name of the parent app check the wb's Container name (under an error handler 'cos it'll error in Excel). With both methods, if you need to know in the wb's open event postpone and check in an OnTime macro called from the open event. b = wb.IsInPlace On error resume next s = wb.Container.Name On error got to 0 If len(s) then etc |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
updating embedded powerpoint in excel file | Excel Discussion (Misc queries) | |||
Embedded Excel Objects in PowerPoint resize after editing | Excel Discussion (Misc queries) | |||
Unable to view embedded excel data in either Powerpoint or Word | Excel Discussion (Misc queries) | |||
Problem in updating the Powerpoint Embedded Chart with Excel figur | Charts and Charting in Excel | |||
Error closing embedded Excel workbook in PowerPoint | Excel Programming |