如何让我的Excel创建代码以忽略第一个工作表?

时间:2018-01-10 16:28:59

标签: excel vba pdf

我有一个excel文件,可以根据模板生成订单。当这些订单获得批准后,它们都会变成PDF格式。我想找到一种方法来改变我的转换为pdf代码以忽略模板。

    Sub SavePDF()

Dim ws As Worksheet

For Each ws In Worksheets
ws.Select

 PO = Range("C14").Value
 Supplier = Range("B4").Value


    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="Z:\Purchase Order Forms\Forms\" & PO, Quality _
    :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False _
    , OpenAfterPublish:=False

Next ws

End Sub

模板标签名为“PurchaseOrderForm”,其他标签名为 OrderNumber & UserName

欢呼任何帮助。

1 个答案:

答案 0 :(得分:0)

然后使用IF语句检查名称:

If ws.Name <> "PurchaseOrderForm" Then

  ' do stuff

End If