你能幫我處理這段代碼嗎?我是初學者。。
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
uj5u.com熱心網友回復:
你的問題是這條線
Activesheet.ExportAsFixedFormat Type:=xlTypePDF, _
filename:="Z:\Incent_2022\ORDINARIA\RETAIL-WHS\Schede Obiettivi\Q1\" & "Schede Obiettivi Retail Classico Q1 22_" & mywsname & “.pdf”, _
在它的末尾有連續字符 _,但下一行沒有任何內容。
,_從行尾洗掉
還“.pdf”需要".pdf"使用普通的雙引號,而不是從 Office 檔案中復制的雙引號(“智能”雙引號)
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/473755.html
