Este fórum está sendo desativado

[Ledurjr]

Boa noite, estou tentando otimizar algumas planilhas no meu trabalho, mas ainda não avancei o suficiente para entender macros e VBA.

Possuo uma planilha com 3 Abas, "Capa", "Laudo" e "Check List", insiro informações na capa que são então transmitidas para as outras duas. Gostaria de colocar um "Botão de impressão" na "Capa" para que assim que colocasse as informações já conseguisse imprimir as abas "Laudo" e "check list", agilizando o trabalho.

Segue em anexo a planilha.

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub ImprimeLaudoECheckList()
 Dim ws As Worksheet
  For Each ws In ThisWorkbook.Worksheets
   If ws.Name <> "Capa" Then ws.PrintOut
  Next ws
End Sub

[Ledurjr]

Funcionou 100% Muitíssimo obrigado!