Thanks for this.

What I am after is a way to select the range of worksheets you want to
print therefore not always set to print all worksheets.

So far I have got this far by setting up a userform with a combobox
and command button that allows me to select a single worksheet (though
the code doesn't actually work as the command button doesn't bring up
the print menu!). What I would like is 2 seperate combo boxes 1) print
worksheet FROM and 2) print worksheet TO, thereby specifying a range
that can be chjanged each time.

Private Sub CommandButton1_Click()
ThisWorkbook.Sheets(Me.ComboBox1.Text).PrintOut Copies:=1,
Collate:=True
End Sub

Private Sub UserForm_Initialize()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Sheets
Me.ComboBox1.AddItem ws.Name
Next
End Sub

any pointers, as always greatly appreciated