Print code

I am a beginner at VB so please don't laugh too much. Can you please help me with the code to make the CANCEL button on the Print Dialog Box to work without printing the document. TIA

Set CancelError property on. When cancel is pressed, it causes an error. Like this:

[CODE]
Sub mnu_Click ()
'... Dims on such here
On Error Goto ErrorHandle
'... Code here
ErrorHandle:
MsgBox "Error #" & Err & vbCrLf & vbCrLf & "Description: " & Err.Description
End Sub