format of powerpoint links to excel

[almagg]

i have 3 potx files
for one of them the links come out as:

Site Safety Metrics Rollup.xlsm!PPT1!R101C2:R118C14

the other are like:

C:\EHS Reports\TFP EHS Report\Site Safety Metrics Rollup.xlsm!PPT1!R192C2:R209C14

i want to have the same format as the first one i.e., without the path.
when the potx files are refreshed the link file will always be opened, so i do not need the path (this is part of a vba program).
the folder containing the files will be sent around and put in different drives.
'EHS Reports' is the main folder and that and everything else inside will remain the same.
but the ppt links will not change so obviously will not update when the 'EHS Reports' folder is somewhere else.
know what i mean?

and anyway i did these one after another.
why did the links show up in different formats?

 

[almagg]

hmm, i just tried to update the links that did not have the path and the '...file could not be found'

so i guess the situation is:

i am creating this on my laptop C drive.
the i am going to move the folder to my mem stick which is the H drive.
also i will be emailing the folder which will be put on an unknown dirve.
the vba program picks up the path of the unknown drive and does other stuff.

how do i get the ppt links to follow?

 

[almagg]

ok, i got it. worked perfectly.
http://www.pptfaq.com/FAQ00759.htm

since i do not know where this folder will be going,

sRollupPath = Workbooks(sRollup).Path 'the current path

on the 'SourceData!' sheet i have
R2 = sRollupPath & "\"
sOldPath = R1 'entered manually to start; don't forget the final "\"
sNewPath = R2

then
.
.
For Each oPPTShape In oPPTSlide.Shapes
.....'oPPTShape.Select
.....If oPPTShape.Type = msoLinkedOLEObject Then
..........oPPTShape.LinkFormat.SourceFullName = Replace(oPPTShape.LinkFormat.SourceFullName, sOldPath, sNewPath)
.
.
etc...

then at the end
R1 = R2
R2 = ""

so whenever the program is run the old path, even if it happens to be the same, will be replaced by the new path.