Hi there - first post
I'm on here all the time. I have never been taught how to program and I make my macros by recording them or copying the text from here.
I have the "print all open documents" macro running but the problem i have is that when i have my 30 or so documents open, they're all in various stages of page-setup (all picking arbitrary trays to print from in the printer) and most of them come out on the wrong paper.
The obvious solution to this of course is to change the page-setup to the correct bins in the printer every time (which i have a macro for to change the page-setup)
Sub PageSetupTrayTwo()
'
' PageSetupTrayTwo Macro
' Macro recorded 04/10/2005
'
With ActiveDocument.Styles(wdStyleNormal).Font
If .NameFarEast = .NameAscii Then
.NameAscii = ""
End If
.NameFarEast = ""
End With
With ActiveDocument.PageSetup
.FirstPageTray = wdPrinterLowerBin
.OtherPagesTray = wdPrinterLowerBin
.DifferentFirstPageHeaderFooter = True
.PageWidth = InchesToPoints(8.27)
.PageHeight = InchesToPoints(11.69)
End With
End Sub
and then print each one but then this of course would defect the purpose of the "print all open documents" macro...
Sub PrintAll()
Dim objDoc As Document
On Error Resume Next
For Each objDoc In Application.Documents
objDoc.PrintOut
Next objDoc
Set objDoc = Nothing
End Sub
The thing is, i know how its frowned upon here not to even try and get the code but I?ve been trying to run a mix of a page-setup macro and print all open documents macro all day and as I mentioned before, i'm not a coder i don?t know what I?m doing.
I would really appreciate if someone could tell me how to run a macro that changes the file setup to a specic thing on ALL the documents currently open.
Please and smiley thanks in advance.
Cecelia