Como obter a data do último dia do mês no Excel?
Obter a data de término de um mês pode ser fácil para si, mas se tiver múltiplas datas no Excel, como obter rapidamente a data de fim de cada mês de uma só vez? Apresento-lhe agora alguns truques rápidos para resolver este problema no Excel.
Obter a data do fim do mês com fórmulas no Excel
Obter a data do fim do mês com VBA no Excel
Obter a data do fim do mês com fórmulas no Excel
Utilizar uma fórmula para encontrar a data de término de cada mês pode ser extremamente simples para qualquer utilizador do Excel.
Selecione uma célula junto aos dados de data e introduza a seguinte fórmula: =DATE(YEAR(A2),MONTH(A2)+1,0) (onde A2 é a célula da qual pretende obter a data do fim do mês). Prima a tecla Enter no teclado e, em seguida, arraste o preenchimento automático até ao intervalo onde deseja aplicar esta fórmula. Assim, a data de término de cada mês será exibida nas células. Veja as capturas de ecrã:
 |
 |
 |
Pode também utilizar esta fórmula =EOMONTH(A2,0) para obter a data de fim do mês. (Antes de introduzir esta fórmula, certifique-se de formatar as células de resultado com o formato de data.)
Dica: No Excel 2003 ou numa versão anterior, se quiser utilizar a fórmula =EOMONTH(A2,0), terá primeiro de instalar o Pacote de Ferramentas de Análise, clicando em Ferramentas > Suplementos. Veja as capturas de ecrã:
 |  |  |
Obter a data do fim do mês com uma Função Definida no Excel
Se já domina VBA, pode usar o código abaixo para obter a data de término do mês.
1. Prima simultaneamente as teclas Alt + F11 no teclado para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Em seguida, clique em Inserir > Módulo para inserir uma nova janela de módulo. Depois, copie o seguinte código VBA para essa janela.
VBA: Obtenha a data do final do mês.
Function LastDayInMonth(Optional pDate As Date = 0) As Date
'Updateby20140723
If pDate = 0 Then pDate = VBA.Date
LastDayInMonth = VBA.DateSerial(VBA.Year(pDate), VBA.Month(pDate) + 1, 0)
End Function
3. Guarde e feche esta janela. Em seguida, selecione uma célula e introduza a fórmula =LastDayInMonth(A2) (A2 contém a data da qual pretende obter o último dia do mês), prima a tecla Enter e obterá a data de fim do mês.
Nota: Este código VBA também exige que formate previamente as células de resultado com o formato de data antes de introduzir a fórmula =LastDayInMonth(A2).
Artigos Relacionados:
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos