1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Escolher qual impressora o Excel vai usar para imprimir

Discussão em 'Progress 4GL' iniciado por jcwins, Janeiro 10, 2012.

  1. baltazar

    baltazar Membro Participativo

    A única maneira que encontrei é trocar por programação a impressora pré-definida.

    Depois de imprimir, "reverto" para a impressora que estava seleccionada.
  2. asartori

    asartori Membro Participativo

    Jaison Antoniazzi, o Link nao abre totalmente o seu fonte...
    Tb preciso selecionar a impressora para a impressao de uma planilha....alguem pode me ajudar?
    Obrigada.
  3. jaisonantoniazzi

    jaisonantoniazzi Membro Ativo

    Bom dia @asartori tudo bom?

    Segue o código:
    HTML:
    /*
    autor...: jaison antoniazzi
    data....: 13/08/2014
    obs.....: executar o dialog de selecao de impressora
    
    contato.: jaison.antoniazzi@gmail.com
    skype...: jaison.antoniazzi
    
    
    */
    
    &SCOPED-DEFINE xlDialogPrinterSetup 9
    
    DEFINE VARIABLE excel AS COM-HANDLE NO-UNDO.
    
    CREATE 'excel.APPLICATION' excel.
    
    excel:workbooks:OPEN('c:\temp\arquivoJAISON.xlsx').
    
    excel:Dialogs({&xlDialogPrinterSetup}):Show().
    
    excel:workbooks:ITEM(1):printout().
    
    excel:QUIT().
    
    RELEASE OBJECT excel.
    Atenciosamente,
    Jaison Antoniazzi
    jaison@neostep.com.br
    skype: jaison.antoniazzi
  4. contatotalitacamargo

    contatotalitacamargo Sem Pontuação

    Roberto o erro é porque você escreveu em letra minuscula. acabei de fazer e deu certo.

    chExcelApp:ActivePrinter = "impressora que quero".

Compartilhe esta Página