我遇到了以下問題。要將 Excel 作業表另存為 PDF，我使用以下代碼。
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True
這在我第一次執行命令時效果很好。檔案以 PDF 格式彈出并顯示在 Adob??e Acrobat Reader DC 中。但是當我再次執行它時，沒有關閉打開的 PDF 檔案，我收到了一個錯誤。只要我一直關閉舊的PDF，就沒有錯誤。我很確定可以在 Acrobat Reader 中的新選項卡中打開下一個檔案，而不會在 VBA 中出現這些錯誤。有人可以幫我嗎？
uj5u.com熱心網友回復：
具有相同名稱的檔案無法在大多數應用程式的同一會話中打開...
請使用下一種方式，它給出不同的名稱并在三個連續的選項卡中打開相同的作業表：
Sub expSheetAsPDFAndOpen()
Dim strPDF As String, i As Long
strPDF = ThisWorkbook.path & "\MyPDF"
For i = 1 To 3
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
FileName:=strPDF & i & ".pdf", _
OpenAfterPublish:=True
Next i
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/363795.html
下一篇：MSXML總是向元素添加命名空間