Printing an excel worksheet as a PDF file

See more:

VB

MS-Excel

PDF

I have written a sub routine to print an excel worksheet as a PDF file. This works on my computer using Office 365 but does not work when I run the program on a laptop which has Office 2003.
I have successfully printed the worksheet manually using "Microsoft Print To PDF" on BOTH machines. The laptop creates the file but it does not have any content and cannot be opened. It has a size of zero bytes but if created manually it is 288KB.
Anybody have any ideas what is going on?

What I have tried:

The code I have written is as follows;

Private Sub SaveWorksheetAsPDF(Title As String, Path As String)
        Dim FileName As String = "\ResultsSheet" & Title & ".pdf"
        Dim totalFileName As String = Path & FileName
        'Print the document to PDF
        oSheet.PrintOut(copies:=1, Preview:=False, ActivePrinter:="Microsoft Print To PDF", PrToFileName:=totalFileName, PrintToFile:=True)

    End Sub