Page Setup Paper Source Issue
I am new to the wonderful forum and I hope that someone could possibly help me with a problem that I am pulling my hair out with.
We are a very small firm that uses Office 2007, our main printers are HP Laserjet P3015 models and also use Utax photocopiers for printing output. Our Laserjet is a four tray printer and I have created Macros to select what specific tray the user wants the print from. Macro now below in case that is a problem:-
“Sub LtrH2()
'
' Ltrheadtest Macro
'
'
With ActiveDocument.Styles(wdStyleNormal).Font
If .NameFarEast = .NameAscii Then
.NameAscii = ""
End If
.NameFarEast = ""
End With
With ActiveDocument.PageSetup
.LineNumbering.Active = False
.FirstPageTray = 260
.OtherPagesTray = 261
.SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False
.DifferentFirstPageHeaderFooter = True
End With
WordBasic.ViewFooterOnly
Selection.WholeStory
Selection.Font.Size = 8
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub”
Very frequently this macro has now stopped working and just spits out a copy from the manual feed tray 1. I had no idea what this could have been up until I noticed something strange on the ‘Page Setup’ screen. All of the trays seem to disappear and the options under paper source change to foreign characters that makes no sense. It really is strange and I’m completely at a loose end on what the problem is. Can anyone please help me? Image attach to demonstrate what happens to the page setup screen.
|