export only active objects to powerpoint using macros

[udaya_kumar]

Hi,

i am exporing objects to powerpoint using VBScript.

i am specifying all the object names in the macro and i need to check which object is active.

then after checking the active objects, i need to export only those active objects to powerpoint.

so how i can do this

[#2]

,IsActive seems to be what you need. The following is an example of how to use it from the api guide:

rem ** minimize all active sheet objects on active sheet **

set s=ActiveDocument.ActiveSheet

objs=s.GetSheetObjects

for i=lbound(objs) to ubound(objs)

    if objs(i).IsActive then objs(i).Minimize

next