macro to print to pdf with a cell value as the file name. the page to pdf is on a different tab

[nreyes601]

Sub printtopdf()
'
' printtopdf Macro
'

'
Sheets("Ticket").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
"C:\Users\Nina\Pit Office-Tickets Dropbox\Pit Office-Tickets Team Folder\Main Testing\3.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
Sheets("Form").Select
Range("C3").Select
End Sub

 

[DanteAmor]

Hi and welcome to MrExcel board!

with a cell value as the file name

In the macro, adjust the values in blue for the name of your sheet and cell where you have the name of the file.

Sub printtopdf()
  Dim NamePdf As String
  Dim PathPdf As String
 
  NamePdf = Sheets("Form").Range("B2").Value
  PathPdf = "C:\Users\Nina\Pit Office-Tickets Dropbox\Pit Office-Tickets Team Folder\Main Testing\"
 
  Sheets("Ticket").ExportAsFixedFormat Type:=xlTypePDF, Filename:=PathPdf & NamePdf & ".pdf", _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub