Zenn
Closed1

VBA 名前一覧からPDFを差し込み印刷

鳥羽眞嘉鳥羽眞嘉

下記の名前一覧を元に、PDFの差し込み印刷を行っていきます。

下記のシートをPDFとして計5枚出力していきます。

Sub PDFで出力()
    Dim i As Long
    For i = 2 To 6
        Worksheets("PDF出力").Range("B2").Value = Worksheets("社員一覧").Cells(i, 1).Value
        Worksheets("PDF出力").ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\○○\Desktop\新しいフォルダー\" & Worksheets("社員一覧").Cells(i, 1).Value & ".pdf"
    Next
End Sub
このスクラップは2023/06/21にクローズされました