Como obter um calendario pop-up apareca quando voce clicar em uma celula no Excel?

Estou usando o Excel no Vista e estou criando uma planilha que exige muito da data entradas. Para facilitar as coisas, eu quero ter um calendário pop-up para permitir a mim e outros usuários inserir datas no arquivo excel facilmente.

Resposta

Edit: Aqui está uma solução ainda melhor, mas um pouco mais complexo para construir. Novamente, isso é para o Excel 2003. Excel 2007 seria um pouco diferente processo tanto quanto a como configurar o atalho de teclado.

Abra sua pasta de trabalho.

Pressione ALT + F11

Inserir > Userform

Clique com o botão direito sobre a caixa de ferramentas de controles e selecione 'Controles adicionais'.

Localize a 11,0 de controle de calendário e marque para adicionar a caixa de ferramentas. Clique em 'OK'.

Selecione o ícone de calendário e clique em Userform para inserir o controle de calendário.

Arraste o calendário para o centro do userform, se necessário.

Tamanho do calendário para preencher o formulário de usuário, se necessário.

Pressione F4 para exibir a janela de propriedades.

Localize o campo de legenda para o formulário de usuário e excluir 'Userform1'. Deixe em branco.

Localize o 'Posição de arranque' e no menu suspenso, selecione 'Manual'.

Dê um duplo clique no calendário e digite esta linha de código entre 'Private Sub Calendar1_Click()' e 'End Sub':

ActiveCell.value = Me.Calendar1.Value

Duplo clique nesta pasta de trabalho no Microsoft Excel Objects no quadrante superior esquerdo. Copie e cole essa macro para a área de módulo para a direita:

Sub shwCalendar)

Userform1.Show

End Sub

Perto de volta ao Excel e vá em Ferramentas > Macro Macros.

Selecione esta macro e clique em 'Opções'.

Selecione uma letra para ser usado como um atalho de teclado.

Perto de volta ao Excel. Selecione uma célula e pressione Ctrl + a sua carta para mostrar o calendário. Clique na data que você deseja inserir e ele aparecerá na célula.

Isso vai funcionar para todas as planilhas na pasta de trabalho.

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Uma vez que você fazer referência a 'Vista', presumo que você estiver usando o Excel 2007. Infelizmente, eu não sou. Então, eu só posso dizer o como fazer isso para o Excel 2003. No entanto, o processo deve ser semelhante, com exceção de como inserir o calendário.

Para o Excel 2003, abra a pasta de trabalho.

Vá em Insert > objeto

Selecione 'Calendar Control 11.0' (creio que é 12,0 para Excel 2007)

Isso irá inserir um calendário na sua planilha. Você pode movê-lo para o local que mais lhe convier. Ele também vai ativar a barra de ferramentas de controle para que você possa manipular o controle.

Clique com o botão direito no calendário e selecione 'Formato de objeto'.

Na guia proteção, desmarque a opção 'Bloqueado'.

Na aba de propriedades, selecione 'não mover ou dimensionar com células' e desmarque a opção 'Imprimir objeto'.

Em seguida, clique duas vezes no calendário. Isto irá abrir o VBE para editar uma macro para ser ativado quando você clicar no calendário.

Digite este código entre 'Private Sub Calendar1_Click()' e 'End Sub'

ActiveCell.Value = Me.Calendar1.Value

Perto de volta ao Excel.

Bloquear a barra de ferramentas caixa de ferramentas de controle, clicando no ícone exibido como uma régua, o triângulo e o lápis. Em seguida, feche a barra de ferramentas caixa de ferramentas de controle.

Selecione uma célula e clique em calendário. A data indicada no calendário será inserida na célula selecionada. Para alterar a data, basta clicar em um diferente.

A uma falha no presente é que você terá que repita esse procedimento para cada planilha, se você tiver várias folhas com entradas de data.

Inscrever - receber um email se alguém adiciona novas respostas/comentários

Comentários

Nuno na 9 Dez 2023

Melhor comentário

Uma maneira de obter um calendário pop-up no Excel é através do uso da ferramenta de Controle de Caixa de Listagem. Primeiramente, você precisa habilitar a guia "Desenvolvedor" no Excel. Após isso, vá até a guia e clique em "Inserir" e selecione o controle de caixa de listagem. Em seguida, desenhe a caixa de listagem na célula desejada. Clique com o botão direito na caixa de listagem, selecione "Formatar Controle de Caixa de Listagem" e defina a entrada como "Calendário". Agora, quando você clicar na célula, o calendário pop-up aparecerá, facilitando a entrada de datas. Espero que isso ajude!

Responder

Sandro Rocha na 30 Abr 2015

Ótima dica, funcionou perfeitamente no meu Excel 2007, só tive dificuldade em identificar o Campo de legenda (“Caption”)e Posição de arranque (“StartUpPosition”) que nesta versão estão em inglês, além de ter de salvar o arquivo como Pasta de Trabalho Habilitada para Macro *.xlsm muito embora acredito que salvando na versão 2003 a macro também funcione, mas você pode perder algumas funções novas do 2007.

Responder

O seu comentário

Acho que a resposta não está correta ou que você gostaria de acrescentar mais
alguma informação? Envie o seu comentário abaixo..