VB Code working in 2010 but not 2003?

Solved!,
I ended up using the following code:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Cancel = True
    MsgBox "Please use the Print buttons located on the worksheet. ", vbExclamation, "Print Canceled"
End Sub

Sub PrintPageOne()
    Application.EnableEvents = False
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True
    Application.EnableEvents = True
End Sub

When the print button is pressed the print will be cancelled and an alert box will appear requesting the user to use the on page buttons...

Thank you for your help