Sumário
Quando você usar a propriedade ActivePrinter no Microsoft Office Word para definir a impressora atual, você também definir a impressora que você selecionar para ser a impressora padrão para o sistema. Se você não deseja alterar a configuração para a impressora padrão do sistema, não use a propriedade ActivePrinter.
Mais informações
Para selecionar uma nova impressora sem ter o Word alterar a impressora padrão do sistema, use o método de WordBasic FilePrintSetup com o sinalizador DoNotSetAsSysDefault definido como True. Por exemplo, em vez de usar o código a seguir:
Set oWord = CreateObject("Word.Application")
oWord.ActivePrinter = "HP LaserJet 4 on LPT2"
Use o código a seguir.
Set oWord = CreateObject("Word.Application")
oWord.WordBasic.FilePrintSetup Printer:="HP LaserJet 4 on LPT2", _
DoNotSetAsSysDefault:=1
Referências
Para obter mais informações sobre a propriedade ActivePrinter, clique nos números abaixo para visualizar os artigos na Base de Conhecimento da Microsoft:
Código de exemplo 162239 para recuperar o nome da impressora ativa
177275 como criar uma macro para alterar o driver de fax ou impressora