Como obter a data do final do mês no Excel?
Talvez obter a data final de um mês seja fácil para você, mas se houver várias datas no Excel, como você pode obter rapidamente todas as datas finais de cada mês de uma só vez? Agora vou apresentar alguns truques rápidos para você resolver esse problema no Excel.
Obtenha a data do final do mês com fórmulas no Excel
Obtenha a data do final do mês com VBA no Excel
Obtenha a data do final do mês com fórmulas no Excel
Usar uma fórmula para encontrar a data final de cada mês pode ser muito fácil para qualquer usuário do Excel.
Selecione uma célula ao lado dos dados de data e digite esta fórmula =DATE(YEAR(A2),MONTH(A2)+1,0) (A2 é a célula da qual você deseja obter a data do final do mês), e pressione a tecla Enter no teclado, depois arraste o preenchimento automático para o intervalo que precisa aplicar essa fórmula. Agora, a data final de cada mês é exibida nas células. Veja as capturas de tela:
 |
 |
 |
Além disso, você pode usar esta fórmula =EOMONTH(A2,0) para obter a data final do mês. (Você precisa formatar as células de resultado como formato de Data antes de inserir esta fórmula.)
Dica: No Excel 2003 ou versão inferior, se você quiser usar a fórmula =EOMONTH(A2,0), precisa instalar o Analysis Toolpak clicando em Ferramentas > Suplementos primeiro. Veja as capturas de tela:
 |  |  |
Obtenha a data do final do mês com Função Definida no Excel
Se você está familiarizado com VBA, pode usar o código VBA abaixo para encontrar a data final do mês.
1. Pressione as teclas F11 + Alt juntas no teclado para abrir a janela Microsoft Visual Basic for Applications.
2. Em seguida, clique em Inserir > Módulo para inserir uma nova janela de módulo. Depois disso, copie o seguinte código VBA para a 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. Salve e feche a janela. Depois selecione uma célula e digite esta fórmula =LastDayInMonth(A2) (A2 contém a data da qual você deseja obter a data do final do mês), então pressione a tecla Enter e você obterá a data final do mês.
Nota: Este VBA também requer que você formate as células de resultado como formato de Data antes de inserir esta fórmula =LastDayInMonth(A2).
Artigos Relacionados:
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins