Delete Blank Pages in Word using Excel Macro

[frongi]

I am using word to edit a document. At the end of the editing I need to delete out the blank pages. I have a macro that works for it in word, but am having trouble "converting" it into something that doesn't return an error in Excel.

This is the code that deletes blank pages.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

The issue I have now is here: "Object doesn't support this property or method"

Please Login or Register  to view this content.

I do have the microsoft word 12.0 object library selected. Changing the wording from Selection.Goto to Content.Goto doesn't work either, as then I get an object required error. Any help would be greatly appreciated with getting this macro to work.

Also any other general tips manipulating word docs from excel vba would be awesome.

[frongi]

figured it out, needed to feed it wdApp and do wdApp.Selection