VBA用于创建多个PDF

Question

具有为合作伙伴（合作伙伴176的编号）计费的格式，并希望创建多个具有不同合作伙伴名称的PDF（合作伙伴名称在A1到A176的partnernamesheet中提到）。我创建了一个循环，但是该循环帮助我创建了不同的PDF，但是在保存PDF时无法应用来自不同工作表的名称范围。

import embed, * as vegaEmbed from 'vega-embed'

Answer 1

这将使用"A" & I命名逻辑将excel保存为PDF。

Sub creatingloopforprint()
    Dim i As Integer

    i = 1

    For i = 1 To 176:
        Worksheets("Invoice format").Activate Range("M14").Value = i
        ActiveWindow.SelectedSheets.ExportAsFixedFormat Type:=xlTypePDF, Filename:="A" & i

    Next i

End Sub

从此处可以根据需要更新特定的保存和打印。