ttorres

Tente usar função VALOR(célula onde esta a data)

Decio

Você está usando na coluna DATA

=SE(E22="";"";HOJE())

?

Se for isso então é a questão de atualização da função HOJE() toda vez em que a planilha é recalculada. Neste caso terá que fazer uma programação VBA para gravar a data quando os dados são inseridos.

Seria algo como por exemplo:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.ScreenUpdating = False
Application.EnableEvents = False
        If Application.Intersect(Target.EntireRow, Range("Data")) then
                          Target.EntireRow, Range("Data") .Value = Now()

        End If
        Application.EnableEvents = True
        application.screenupdating = true
End sub

Corrigindo:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.ScreenUpdating = False
Application.EnableEvents = False
        Application.Intersect(Target.EntireRow, Range("Data")).Value = Format(Now(), "dd/mm/yyyy")
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub

Assim vai funcionar!!!

Olá Henrique,
Assim funciona para alterar a própria célula quando for preenchida.
Eu preciso que a Range Data receba a data quando a CAIXATIPOS for preenchia, e que a Range Data seja limpa quando a CAIXATIPOS for apagada

Obrigado.