创建多个PDF合并为一个文件从excel

我目前使用下面来创建个人pdf文件（每次一个新的价值被放入C4，一个新的不同数据的pdf生成）。有没有一种方法可以将所有这些pdf保存到一个文件中？创建多个PDF合并为一个文件从excel

预先感谢您的帮助

Sub moveselection() 
Dim i As Integer 


For i = 1 To 108 


Range("C4").Value = Sheets("Sheet1").Range("A4").Offset(i, 0).Value 
ThisFile = Range("C4").Value 


ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ 
Filename:="T:\Maths\QM" & _ 
ActiveSheet.Range("C4").Value & ".pdf", _ 
From:=1, _ 
To:=1, _ 
OpenAfterPublish:=False 


Next i 


End Sub

来源

2017-06-14 TheQ1991

Excel可能会生成PDF，但我不认为它实际上是一个操作PDF的工具，所以它不太可能为您提供PDF文档合并功能。 –

而不是每次进入循环之前，为什么不创建一个新的工作簿，然后将活动工作表复制到这个新的保存为PDF格式工作簿然后在循环结束后，您可以将整个工作簿导出为pdf？

来源

2017-06-14 14:18:43 EdHunter

我不确定我完全理解你的意思，对不起。我如何将所有信息放入新的工作表中？ – TheQ1991

创建多个PDF合并为一个文件从excel

回答

相关问题