Download PDF from website and add to PDF made from different excel sheets

[Cyfer]

Hi

I'm using a macro to generate a PDF. I was wondering if and how to add a downloaded pdf (from URL) and add it to the array below.

Reason I want this is because I want the end to not to add the PDF as and extra document but have all in one PDF.

Thanks

Sub Save_as_pdf()

Dim FSO As Object

Dim s(1) As String

Dim sNewFilePath As String



Set FSO = CreateObject("Scripting.FileSystemObject")

s(0) = ThisWorkbook.FullName

ThisWorkbook.Sheets(Array("sheet1", "sheet2", "sheet3", "sheet4")).Select

ActiveSheet.ExportAsFixedFormat _

Type:=xlTypePDF, _

Filename:="examplefile " & Date & ".pdf", Quality:= _

xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:= _

False, OpenAfterPublish:=True

End Sub

 

[John_w]

You could use a tool like PDFtk Server to merge the two PDFs into one PDF.

Here is example code which would need modifying for your case:

VBA Export diferent excel files to pdf and then combine them to one file

Hi, I know little of this, wondering if someone could help me. I 'm trying to create something like this thread Append to pdf VBA I've been searching for something like this, but just for one subfolder. How can i use this routine, but calling it inside another routine (let's say main...

www.mrexcel.com