Hi all
A bit new to VBA. I have a macro that will produce a PDF for a excel dashboard. It pulls all the data into the dashboard from a list.
The coding i have used that works is below. I know there is way to automate/loop this so that it will work through full list but Im struggling to get my head round the coding.
Any help greatly received.
Thanks
Fox
Sub CreatePDF()
Dim ID As String
ID = Range("J6").Text
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="\\persian2\staffmydocs$\FowkesCr\Documents\Test\" + ID + ".pdf", _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
Sub Save_Excel_As_PDF_1()
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF
End Sub
A bit new to VBA. I have a macro that will produce a PDF for a excel dashboard. It pulls all the data into the dashboard from a list.
The coding i have used that works is below. I know there is way to automate/loop this so that it will work through full list but Im struggling to get my head round the coding.
Any help greatly received.
Thanks
Fox
Sub CreatePDF()
Dim ID As String
ID = Range("J6").Text
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="\\persian2\staffmydocs$\FowkesCr\Documents\Test\" + ID + ".pdf", _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
Sub Save_Excel_As_PDF_1()
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF
End Sub
