I have this code to export to PDF
, but it goes to the documents folder. I'd like to export it to a different location. How do I do that?
This is the code:
Private Sub CommandButton1_Click()
Range("a1:k44").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ru & "REMITO " & Range("C7") & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub