Macro for Samsung ML1450 on XP

  SamHaz 11:03 07 Oct 04
Locked

I want to set up a macro which will enable me to print one copy from multi-purpose tray (top) (which will hold many sheets of paper)and then to print one copy from tray 1 (bottom tray). I use Microsoft Office 97 (word and excel).

Can anybody help me please.

Thanks

  keith-236785 11:11 07 Oct 04

Sub bothtrays()<- (<- = enter)
With ActiveDocument.PageSetup <-
.FirstPageTray = wdPrinterUpperBin <-
.OtherPagesTray = wdPrinterUpperBin <-
End With <-
ActiveDocument.PrintOut <-
With ActiveDocument.PageSetup <-
.FirstPageTray = wdPrinterLowerBin <-
.OtherPagesTray = wdPrinterLowerBin <-
End With <-
ActiveDocument.PrintOut <-
End Sub <-

if you copy and paste this into notepad and save,remember to remove all the <-'s

this is a macro from a computer magazine (march edition i seem to recall), dont know much about macros but maybe someone else can help adapting it for your purpose. it was written to do exactly what you want.

good luck

  keith-236785 11:15 07 Oct 04

site formatting screwed that one up lol lets try again


Sub bothtrays()<- (<- = enter)

With ActiveDocument.PageSetup <-

.FirstPageTray = wdPrinterUpperBin <-

.OtherPagesTray = wdPrinterUpperBin <-

End With <-

ActiveDocument.PrintOut <-

With ActiveDocument.PageSetup <-

.FirstPageTray = wdPrinterLowerBin <-

.OtherPagesTray = wdPrinterLowerBin <-

End With <-

ActiveDocument.PrintOut <-

End Sub <-

  keith-236785 11:16 07 Oct 04

also remember to remove the blank lines, or send me an e-mail and i will send the notepad version of this

This thread is now locked and can not be replied to.

Best phone camera 2016/2017: Galaxy S7 vs iPhone 7 vs Google Pixel vs HTC 10 Evo vs OnePlus 3T vs…

1995-2015: How technology has changed the world in 20 years

The Pantone Colour of the Year 2017 is Green

Super Mario Run preview | Hands-on first impressions of Super Mario Run: Mario's iPhone & iPad…