Para que na mesma célula fique esse formato personalizado, é só seguir o que o Fernando disse:
Formatação persoalizada:
00"/"00"/"0000
Mas, a célula ficará como um valor DATA. O pessoal já deu a solução para função.
Mais um ideia usando VBA
Mas se for usar e entender um pouco de VBA, pode usar o code abaixo dentro da Pasta especifica. Ele vai verificar a alteração da célula e transforma-lo no formato de DATA. Se não for uma data ele retorna o texto digitado, ou se for uma data menor do que 1900 ele apenas formatará a célula no formato personalizado.
Option Explicit
:)
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Target.Value2 = FormatDateTime(CDate(Format(Target.Value2, "00/00/0000")))
End Sub
Pietro Farias
Se foi resolvido suas dúvidas, lembre se de marcar o tópico como RESOLVIDO.
ANALISTA X
Postado : 30/11/2016 10:18 am