Ir ao conteúdo

Posts recomendados

Postado

Bom dia,

 

Amigos do Clube do Hardware! Necessito da ajuda de vocês...

 

Bem, o que está acontecendo é o seguinte, eu trabalho com planilhas de entrega de cartões de Bolsa Família, Contas e Cartão Cidadão.

O que eu estou querendo fazer, porém, estou com dificuldade é de ocultar uma planilha. Mas não somente ocultar, afinal, existe uma opção no Excel que oculta tranquilamente a planilha, mas quando ela está oculta, a planilha se torna impossível de trabalhar até que eu reexiba ela.

 

Aí é que está o ponto chave da conversa, eu preciso ocultar a planilha, mas ao mesmo tempo, quero trabalhar nela apenas usando os botões que chama a planilha desejável.

 

P.s. Os botões para chamar as planilhas estão prontas, funciona tudo beleza... Mas quando eu oculto a planilha para manter a discrição, o botão da erro.

 

Eu agradeço demais a ajuda de vocês!

 

Muito obrigado!

  • Solução
Postado

Acho que tem que reexibir a planilha para depois ocultar via macro.

Para reexibir:

Sheets("Plan1").Visible = True

Para ocultar:

Sheets("Plan1").Visible = False

 

Altere Plan1 para o nome da planilha;

Postado
21 minutos atrás, Wilken Perez Filho disse:

Toda vez que eu quiser editar a Planilha "oculta" eu terei que reexibir antes é?

 

Não necessariamente, você pode editar a planilha oculta via macro, exemplo:

 

Supondo que uma segunda planilha está oculta, você pode buscar os dados da que está visível e colar na oculta.

Sub teste()
    Sheets("Plan2").Range("A1") = Sheets("Plan1").Range("A1").Value
End Sub

Observação, para realmente esconder a planilha utilize o código:

Sheets("Plan1").Visible = xlVeryHidden

Que não irá exibir essa guia ao clicar com o botão direito do mouse com a intenção de reexibir as planilhas ocultas.

Postado
3 horas atrás, R0DR1G0_CWB disse:

 

Não necessariamente, você pode editar a planilha oculta via macro, exemplo:

 

Supondo que uma segunda planilha está oculta, você pode buscar os dados da que está visível e colar na oculta.


Sub teste()
    Sheets("Plan2").Range("A1") = Sheets("Plan1").Range("A1").Value
End Sub

Observação, para realmente esconder a planilha utilize o código:


Sheets("Plan1").Visible = xlVeryHidden

Que não irá exibir essa guia ao clicar com o botão direito do mouse com a intenção de reexibir as planilhas ocultas.

 

 

Boa tarde,

 

Beleza, entendi algumas partes, por assim dizer... rsrs...

Não quero abusar, mas poderia me ajudar passo a passo?

 

A minha base está dessa forma! A intenção seria ocultar as abas "Bolsa Familia" "Cartão Cidadão" e "Contas".

 

Deixar somente a aba "Administração" como a principal e visível.

 

Obrigado, meu rei! Espero a sua resposta

1.png

Postado
12 horas atrás, lHenrique_10 disse:

Acho que tem que reexibir a planilha para depois ocultar via macro.

Para re-exibir:

Sheets("Plan1").Visible = True

Para ocultar:

Sheets("Plan1").Visible = False

 

Altere Plan1 para o nome da planilha;

 

Boa noite,

 

Amigo, usei seu modelo e tive que fazer algumas alterações nos botões para ocultar e depois reexibir novamente.

 

Muito obrigado!

 

Pode fechar o tópico, solução encontrada!

 

@diego_janjao amigão, obrigado pela ajuda!!

Postado

Só pude acessar o tópico agora. Parece que já encontrou a solução para o problema e isto é ótimo.

 

 

Não se esqueça de clicar em curtir na resposta de quem te ajudou e de marcar a melhor resposta do tópico. É uma forma de agradecimento a quem compartilhou algum conhecimento com você.

 

  • Amei 1

Crie uma conta ou entre para comentar

Você precisa ser um usuário 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 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...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!