Ir ao conteúdo
  • Cadastre-se
Wilken Perez Filho

Excel comando para ocultar planilha

Recommended Posts

Bom dia,

 

Amigos, estou precisando de uma ajuda.

 

Estou em fase de conclusão da minha planilha de cartões.

 

A questão é o seguinte, dias atrás o fórum me ajudou a ocultar a planilha.

 

Porém, estou numa situação mais complexa... Por exemplo, eu preciso ocultar a planilha clicando no botão de fechar "X" e também clicando no botão de cancelar.

 

Esse é o código que eu fiz:

Citação

Sub CommandButton2_Click()
    Sheets("CARTÃOCIDADÃO").Visible = True
  Pesquisa = InputBox("Informe o nome do cliente ou o número do benefício", "Pesquisar cartão do cliente")
  If Pesquisa = "" Then Exit Sub
  Set plan = Sheets("CARTÃOCIDADÃO")
    Set x = plan.Cells.Find(what:=Pesquisa)
    If Not x Is Nothing Then
      firstAddress = x.Address
      Do
        plan.Select
        x.Select
        MsgBox "Texto encontrado na célula " & x.Address & Chr(10) & "Planilha: " & plan.Name & _
         Chr(10) & "Texto: " & x.Text
        Set x = plan.Cells.FindNext(x)
      Loop While Not x Is Nothing And x.Address <> firstAddress
    Else
      MsgBox "Cliente não encontrado na planilha " & plan.Name
      Sheets("CARTÃOCIDADÃO").Visible = False
       ActiveWorkbook.Save
    End If
End Sub

 

5b29214a3148d_Semttulo.png.818e3635fa1919fbad58d93a1067ac2a.png

 

A questão é: Desejo ocultar a planilha quando pressionar em "CANCELAR" ou FECHAR "X".

 

Me ajudem, por favor!

 

Abraços!

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

×