在文件打开时禁止MS Word中的对话框警告

Question

I am using OLE Automation in VBA to open several hundred htm files and save them as word doc files.

Occasionally this dialog shows up:

Linked style sheets are only supported in web format files.  By saving to this format, all links to style sheets will be lost.

I have Application.displayalerts set to false - is there any way to ignore that particular dialog and carry on execution.

Answer 1

Excel accepts Application.DisplayAlerts = none, Word uses three Long constants: wdAlertsNone, wdAlertsAll and wdAlertsMessageBox. If you use wdAlertsNone, your code should work ;)

Answer 2

尝试在调用SaveAs()之前添加此行：

Application.ActiveDocument.OptimizeForWord97 = True