Skip to main content

Como obter a data do final do mês no Excel?

Author: Sun Last Modified: 2025-08-06

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:

doc-get-end-of-month-date-1
doc-arrow-down
doc-get-end-of-month-date-2

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:

doc-get-end-of-month-date-3 doc-arrow-right doc-get-end-of-month-date-4

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

🤖 Kutools AI Aide: Revolucione a análise de dados com base em: Execução Inteligente|Gerar Código |Criar Fórmulas Personalizadas|Analisar Dados e Gerar Gráficos |Acionar Funções Aprimoradas…
Recursos populares: Encontrar, Destacar ou Marcar Duplicados|Excluir Linhas em Branco|Combinar Colunas ou Células sem perder dados| Arredondar...
Super PROC: PROC com múltiplos critérios|PROC com múltiplos valores|Procura em várias planilhas|Correspondência Fuzzy....
Lista Suspensa Avançada: Crie rapidamente Lista Suspensa|Lista Suspensa Dependente|Lista Suspensa com Múltipla Seleção....
Gerenciador de Colunas: Adicionar um número específico de colunas |Mover Colunas |Alternar o Estado de Visibilidade de Colunas Ocultas| Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco|Visualização de Design|Barra de fórmulas aprimorada|Gerenciador de Pasta de Trabalho & Planilha|Biblioteca de AutoTexto|Selecionador de Data|Mesclar Dados |Criptografar/Descriptografar Células|Enviar Email por Lista|Super Filtro|Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ... ) |Mais de50 Tipos de Gráficos (Gráfico de Gantt, ... ) |Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ... ) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ... ) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ... ) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ... ) |... e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 outros!

Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo.Clique aqui para obter o recurso que você mais precisa...

Office Tab traz interface de abas para o Office e facilita muito seu trabalho

  • Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas abas da mesma janela, em vez de novas janelas.
  • Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!