mattdeak
mattdeak

Reputation: 190

Word file corrupts after SaveAs

I've build a program to generate other docm files. The program works just fine without saving the generated files through VBA. When I do save through VBA with a SaveAs statement, however, the generated file becomes corrupt. Trying to open the file gives the following message:

"Could not open the file, there is a problem with the contents."

The SaveAs statement is as follows:

qDoc.SaveAs (getQuizURL(quizname))

The quizUrl function has been thoroughly tested and operates properly.

Does anyone know what's causing this and how to solve it? I could save it all manually, but given that other people will be using this program I'd like it to make it as friendly as possible.

Upvotes: 1

Views: 432

Answers (1)

cyboashu
cyboashu

Reputation: 10443

You are missing file format specification.

I am not sure about SaveAs either from your code.

I have got Office -2016 and it has a function called SaveAs2, but may be SaveAs is available in older versions.

Anyhow, change your code to specify the file format.

 ThisDocument.SaveAs2 "C:\temp\Test.docm", WdSaveFormat.wdFormatXMLDocumentMacroEnabled

This will do the trick.

Upvotes: 1

Related Questions