Como calcular os dias restantes até o prazo final no Excel?
No trabalho diário e na gestão de projetos, acompanhar quantos dias restam antes de um prazo final é crucial. Por exemplo, você pode ter uma lista de datas de prazos finais e precisar monitorar os dias restantes para tarefas, atribuições, expirações de contratos ou marcos de projetos. Calcular os dias restantes de forma eficiente ajuda a garantir que datas importantes não sejam perdidas e apoia um melhor planejamento e gerenciamento do tempo. Este artigo explica métodos práticos para calcular os dias restantes até o prazo final no Excel, fornecendo orientações passo a passo e soluções para diferentes necessidades.
- Calcular os dias restantes até o prazo final com fórmulas
- Código VBA - Automatize o cálculo dos dias restantes e, opcionalmente, destaque ou notifique prazos vencidos
Calcular os dias restantes até o prazo final com fórmulas
Se você deseja determinar rapidamente o número de dias restantes antes de cada prazo final, o Excel oferece soluções simples de fórmulas. Essas são adequadas para listas estáticas ou quando é necessário recalcular regularmente com base na data atual.
1. Em uma célula em branco onde você deseja exibir o resultado (por exemplo, na coluna B ao lado da sua data de prazo final na coluna A), insira a seguinte fórmula:
=A2-TODAY()Esta fórmula subtrai a data de hoje (retornada pela função HOJE()) da data de prazo final na célula A2. O resultado é o número de dias restantes.
Após inserir a fórmula, arraste a alça de preenchimento para baixo para aplicar esse cálculo a linhas adicionais contendo datas de prazo final, conforme mostrado abaixo:
2. Para garantir que seus resultados sejam exibidos como números, formate as células resultantes como Geral. Clique na guia Página Inicial > localize Formato de Número no menu suspenso > selecione Geral, conforme mostrado abaixo:
Notas e Dicas Práticas:
- Se a data do prazo final já tiver passado (for anterior à data de hoje), o resultado será um número negativo, indicando o número de dias de atraso.
- Se você quiser evitar exibir valores negativos (por exemplo, mostrando 0 para tarefas vencidas), use esta fórmula alternativa:
=MAX(0,A2-TODAY())Essa fórmula compara os dias restantes calculados com 0 e exibe o maior dos dois—substituindo efetivamente números negativos por 0.
Essa abordagem é especialmente útil ao relatar prazos onde apenas os dias restantes (não negativos) são de interesse, como tarefas pendentes ou expirações de contratos futuros.
- Sempre verifique se suas datas de prazo final são valores de data válidos no Excel. Datas incorretas ou formatadas como texto resultarão em erros de cálculo ou resultados inesperados.
- Fórmulas que usam
HOJE()serão automaticamente atualizadas toda vez que você abrir ou recalcular sua planilha. - Se você preferir trabalhar com dias úteis (excluindo fins de semana e feriados), considere usar a função
DIATRABALHOTOTALpara cenários diferentes.
Revisar regularmente sua lista de prazos e recalcular os dias restantes pode melhorar significativamente sua capacidade de antecipar e agir sobre prazos futuros. Se você precisar de automação mais avançada ou lembretes visuais, veja a solução VBA abaixo.
Código VBA - Automatize o cálculo dos dias restantes e, opcionalmente, destaque ou notifique prazos vencidos
Para usuários que lidam com extensas listas de prazos ou desejam simplificar o processo, automatizar o cálculo dos dias restantes com VBA pode reduzir consideravelmente o esforço manual. Esse método é particularmente valioso quando você deseja que o Excel execute ações adicionais, como destacar automaticamente prazos vencidos ou fornecer uma notificação, garantindo que datas importantes nunca sejam negligenciadas.
1. Para usar este método, habilite a guia Desenvolvedor se ela ainda não estiver visível (Arquivo > Opções > Personalizar Faixa de Opções > marque Desenvolvedor). Vá para Desenvolvedor > Visual Basic para abrir o Editor VBA. Na janela VBA, clique em Inserir > Módulo e insira o código VBA abaixo:
Sub CalculateAndHighlightDaysLeft()
Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Dim deadlineCol As String
Dim resultCol As String
Dim daysLeft As Long
Dim cell As Range
On Error Resume Next
' Configure columns as needed below:
deadlineCol = "A" ' Column containing deadlines
resultCol = "B" ' Column to place days left calculation
Set ws = ActiveSheet
lastRow = ws.Cells(ws.Rows.Count, deadlineCol).End(xlUp).Row
For i = 2 To lastRow
If IsDate(ws.Cells(i, deadlineCol).Value) Then
daysLeft = ws.Cells(i, deadlineCol).Value - Date
ws.Cells(i, resultCol).Value = daysLeft
' Highlight overdue deadlines
If daysLeft < 0 Then
ws.Cells(i, deadlineCol).Interior.Color = RGB(255, 185, 185) ' Light red fill
' Optionally show popup message for overdue (uncomment next line if desired)
' MsgBox "Row " & i & " is overdue! Deadline: " & ws.Cells(i, deadlineCol).Text, vbExclamation, "KutoolsforExcel"
Else
ws.Cells(i, deadlineCol).Interior.Pattern = xlNone
End If
Else
ws.Cells(i, resultCol).Value = "Invalid date"
ws.Cells(i, deadlineCol).Interior.Color = RGB(255, 235, 156) ' Yellow fill for invalid data
End If
Next i
End Sub2. Feche o Editor VBA, retorne à sua planilha e pressione Alt + F8. No diálogo que aparecer, selecione CalcularEdestacarDiasRestantes e clique em Executar. O código processará cada data na coluna A (da linha 2 para baixo) e escreverá os dias restantes na coluna B. Prazos vencidos (onde a data for anterior à de hoje) serão automaticamente destacados em vermelho claro. Células com datas inválidas serão preenchidas em amarelo e marcadas como "Data inválida" na coluna de resultados.
- Você pode modificar deadlineCol e resultCol no código se seus prazos estiverem em uma coluna diferente.
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