Sumário
Quando utilizar a propriedade ActivePrinter no Microsoft Office Word para definir a impressora actual, pode definir também a impressora que seleccionar a impressora predefinida para o sistema. Se não pretender alterar a definição para a impressora predefinida do sistema, não utilize a propriedade ActivePrinter.
Mais informações
Para seleccionar uma nova impressora sem ter de alterar a impressora predefinida do sistema do Word, utilize o método de FilePrintSetup do WordBasic com o sinalizador de DoNotSetAsSysDefault definido como True. Por exemplo, em vez de utilizar o seguinte código:
Set oWord = CreateObject("Word.Application")
oWord.ActivePrinter = "HP LaserJet 4 on LPT2"
Utilize o seguinte código.
Set oWord = CreateObject("Word.Application")
oWord.WordBasic.FilePrintSetup Printer:="HP LaserJet 4 on LPT2", _
DoNotSetAsSysDefault:=1
Referências
Para mais informações sobre a propriedade de ActivePrinter, clique nos números de artigo que se segue para visualizar os artigos na Microsoft Knowledge Base:
Exemplo de código 162239 para obter o nome da impressora activa
177275 como criar uma macro para alterar a impressora ou controlador de fax