Ir ao conteúdo
  • Cadastre-se

Ajuda Macro VBA


tiagonmuniz

Posts recomendados

Bom dia!!

Finalmente eu testei, para mim deu certo, veja se é isso...

Sub FoiTestado()
Worksheets("REENTREGA VAREJO").PageSetup.PrintArea = Range("B2", Range("G65536").End(xlUp).Offset(2)).Address
'Application.Dialogs(xlDialogPrinterSetup).Show 'Caso queira escolher as impressoras instaladas
ActiveSheet.PrintOut 'Essa linha vai executar a impressão para a impressora Padrão
End Sub

Outra coisa caso tenha problema com a Àrea, tente limpa-la antes (ActiveSheet.PageSetup.PrintArea = "")

Link para o comentário
Compartilhar em outros sites

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...