Ir ao conteúdo
  • Cadastre-se
valdir de Souza teixeira j

Excel programação vba if em sheets

Recommended Posts

Bom dia!!!

 Precisava de uma ajuda em programação VBA...

 

Tenho uma planilha(workbook) com várias abas(sheets)...

Nas abas (sheets) existem três condições(IF), sendo elas em células Ex:

planilha1 - célula A1 - "imprimir"

planilha2 - célula A1 - "não imprimir"

planilha3 - célula A1 - "imprimir"

planilha4 - célula A1 - "não imprimir"

Precisava de uma programação que fizesse impressão das planilhas que tiver resultado na célula A1 a palavra "imprimir" ou não imprimir quando tiver a palavra "não imprimir".

Compartilhar este post


Link para o post
Compartilhar em outros sites

Boa tarde,

 

Acredito que esse código pode te ajudar.

 

Sub Imprimir()

    Application.ScreenUpdating = False

    If Worksheets("Planilha1").Cells(1, 1).Value = "imprimir" Then
        Worksheets("Planilha1").Select
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
    End If
    
    If Worksheets("Planilha2").Cells(1, 1).Value = "imprimir" Then
        Worksheets("Planilha2").Select
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
    End If
    
    MsgBox "Concluído!"
    
End Sub

 

[]'s

Compartilhar este post


Link para o post
Compartilhar em outros sites

Este é mais simples e se aumentar o numero de guias nao precisa alterar o codigo

 

 

Sub Imprimir()

 

Dim Sh as worksheets

 

For each sh in worksheets


if ws.name <> "Menu" and ws.range("A1").value = "Imprimir" Then 'Menu deve ser uma planilha principal que você tem como referencia e provavelmente nao vai imprimir em nenhum momento. Se tiver outro nome é so trocar o nome Menu 

 

sh.printout

 

end if

 

end sub

 

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações 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

×