Printing to a different printer

I'm wanting to print to one printer with one command button, and another, with another command button. How can I do this?

Thanks,
Brady

It is mela's function:
private sub SelectPrint(printername as string)
Dim CurrentPrinter As Printer 'This must be declared.
Dim MyDoc As Object 'create a word variable
Set MyDoc = CreateObject("Word.Application")

With MyDoc
For Each CurrentPrinter In Printers
If CurrentPrinter.DeviceName = printername Then
Set Printer = CurrentPrinter
Exit For
End If
Next
end sub