This is the coolest script I have seen in quite a while!

To the author, you talk about the error with and needs to be corrected to:
Code:

$pagObj = $pagsObj.Item($PageCnt)



Can you please modify your code and put this in place?

You also have some vars in Strings, e.g.:
Code:

$stnObj = $AppVisio.Documents("$VSS")



Which can be modified to (and it still works)..
Code:

$stnObj = $AppVisio.Documents($VSS)



Lastly, you do have a long line that should taken care of too..

Thanks again!

Kent
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's