Getting real fullname in Powerpoint, Word and Excel

R

ruben

Hi,

I'm developing a vb macro that needs to know the file absolute path of
the file
being edited. With the file name the macro copies the file to another
location
automatically.

The problem is when the file is located in the web, for example:
http://www.business.auburn.edu/~pmcmullen/mngt4350/encounters.ppt.

On this cases the fullname method returns the url (http://...) instead
of the local filename (typical msoXXXX.ppt files located in Local
Settings/Temp.

how can i get the mso file name?

This is like I get now the fullname (vbs example)


dim papp

set papp = GetObject("","PowerPoint.Application")

dim pdoc

set pdoc = papp.ActivePresentation

msgbox pdoc.Fullname
 
Top