I have a simple Macro I use to print records in a sheet. It works fine as long as I am connected to a printer, but now i would like to print it to a PDF and send it instead. However, when I print to file it will try to create new files for every selection i print, instead of what I would like, one file with all selections. Does anyone have an idea of how I can do that?
Any help appreciated:
Bellow is the macro I use
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 11.02.2008 by Ken
'
'
Selection.AutoFilter Field:=2, Criteria1:="Angkor Star"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.AutoFilter Field:=2, Criteria1:="Bou Savy"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Any help appreciated:
Bellow is the macro I use
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 11.02.2008 by Ken
'
'
Selection.AutoFilter Field:=2, Criteria1:="Angkor Star"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Selection.AutoFilter Field:=2, Criteria1:="Bou Savy"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub