Экспорт вкладок Excel в отдельный файл PDF - пропустите первые 3 вкладки

Question

Новое в кодировании VBA в Excel и попытка выяснить, как пересмотреть мой текущий код (см. Ниже).Он создает PDF для каждой из моих вкладок, но я просто хочу, чтобы он игнорировал первые 3 вкладки, где у меня есть работа, и создавал только PDF-файлы, начиная с 4-й вкладки.Я уверен, что это простое дополнение для определения области, но не могу точно определить, как ее кодировать.

Sub ExportToPDFs()
' PDF Export Macro
' Change C:\Exports\ to your folder path where you need the files saved
' Save Each Worksheet to a separate PDF file.

Dim ws As Worksheet

For Each ws In Worksheets
ws.Select
nm = ws.Name

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="File Location" & nm & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False

Next ws

End Sub

Благодарим за любую помощь, которую вы все можете оказать.

Спасибо!

Answer 1

Предполагая, что листы, которые вы хотите пропустить, это индексы 1, 2 и 3, вы можете использовать цикл For, чтобы пропустить их и начать с листа 4:

Sub exportToPDF()
Dim ws As Worksheet
Dim i As Long
Dim nm As String

For i = 4 To ThisWorkbook.Worksheets.Count
    With ThisWorkbook.Worksheets(i)
        nm = .Name
        .ExportAsFixedFormat Type:=xlTypePDF, _
                                    Filename:="File Location" & nm & ".pdf", _
                                    Quality:=xlQualityStandard, IncludeDocProperties:=True, _
                                    IgnorePrintAreas:=False, OpenAfterPublish:=False
    End With
Next i
End Sub