MSGBOX quando uma celula tiver data igual a hoje

[Eduardo2345]

Boa noite pessoal.

 

Desenvolvi uma planilha de controle e preciso de ajuda para fazer um alerta.

Tenho uma coluna que me devolve as datas de pagamentos.

Preciso que quando as datas dessa coluna for igual a hoje acione uma MSGBOX.

È possivel?

[Basole]

Experimente este exemplo:

If VBA.Format(ActiveCell.Value, "dd/mm/yyyy") = VBA.Format(VBA.Date, "dd/mm/yyyy") Then

MsgBox ActiveCell.Address & " é igual a data de hoje", 64, "Veficando datras"


End If