wORD ERROR SIGNATURE

G

gary at protocol

Running Word 2003 SP1, macro that changes the activeprinter. If I change the
default printer or run another macro that switches the printer, get following
error:
error signature
appname winword.exe app/ver 11.0.6359.0 appstamp 40c8b025
Modname winword.exe Mod/ver 11.0.6359.0 Modstamp 40c8b025
debug 0 Offset 0002cc75
here is the macro:
PrinterVar = ActivePrinter
MyString = Mid(PrinterVar, 1, 10)
If UCase(MyString) = "\\IBM235\L" Then
With ActiveDocument.PageSetup
Options.DefaultTray = "Tray 2"
.FirstPageTray = wdPrinterDefaultBin
.OtherPagesTray = wdPrinterDefaultBin
End With

ActiveDocument.PrintOut
With ActiveDocument.PageSetup
Options.DefaultTray = "Tray 1"
.FirstPageTray = wdPrinterAutomaticSheetFeed
.OtherPagesTray = wdPrinterAutomaticSheetFeed
End With
endif

If I change the default printer then click on this macro, I'll get the error
signature.
Any help would be appreciated
Gary
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

error signature 1
error signature 1
word vba to select paper trays based on activeprinter 6
Help with my printer macro 1
Error signature Microsoft Office word 1
Printer Macro setup in Word using VB 1
ActiveDocument.PageSetup / Selection.PageSetup 3
Using Excel VBA to Format Word Document 0

Top