尝试复制多个 pdf 中的工作表 - 语法错误

Trying to copy worksheets in multiple pdfs - Syntax Error

你能帮我看看这段代码吗?我是初学者..


Sub ExportSheetstoPDF()

Dim ws As Worksheet
Dim mywsname As String

For Each ws In Worksheets
    ws.Select
    mywsname = ws.Name
    Activesheet.ExportAsFixedFormat Type:=xlTypePDF, _
    filename:="Z:\Incent_2022\ORDINARIA\RETAIL-WHS\Schede Obiettivi\Q1\" & "Schede Obiettivi Retail Classico Q1 22_" & mywsname & “.pdf”, _

    Next ws
End Sub

你的问题是行

Activesheet.ExportAsFixedFormat Type:=xlTypePDF, _
    filename:="Z:\Incent_2022\ORDINARIA\RETAIL-WHS\Schede Obiettivi\Q1\" & "Schede Obiettivi Retail Classico Q1 22_" & mywsname & “.pdf”, _

结尾有续行符_,但下一行没有续行。

删除行尾的,_

此外 “.pdf” 需要 ".pdf" 即使用普通的 double-quotes 而不是从 Office 文档(“智能”double-quotes)复制的