Hello looking for some help/advice.

I am deploying a couple of 5-bin mail boxes on our HP4015x printers (Im newbie when it comes to VB).

We use macros to print our templates. I need to include the mailboxes now on our macros. Current macro:

"
Sub PrintHeaded_Plain()

'Call the Update Fields code, this will update all field codes in the current document, including the footer
UpdateFieldsCode
'Set to print from Tray 2
With Options
.UpdateFieldsAtPrint = True
.UpdateLinksAtPrint = True
.DefaultTray = "Tray 2"
End With
With ActiveDocument.PageSetup
.PaperSize = wdPaperA4
.FirstPageTray = wdPrinterLowerBin
.OtherPagesTray = wdPrinterLowerBin
End With
ActiveDocument.PrintOut (copies = 1)
'Set to print from Tray 4
With Options
.DefaultTray = "Tray 4"
End With
With ActiveDocument.PageSetup
.PaperSize = wdPaperA4
.FirstPageTray = wdPrinterPaperCassette
.OtherPagesTray = wdPrinterPaperCassette
End With
ActiveDocument.PrintOut (copies = 1)
'Reset back to Defaults
With Options
.UpdateFieldsAtPrint = True
.UpdateLinksAtPrint = True
.DefaultTray = "Auto Select"
End With
With ActiveDocument.PageSetup
.PaperSize = wdPaperA4
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
End With
End Sub
"


To help does anyone know the correct syntax to refer to the mailboxes?

Any help/advice moving forward would be great!