Olá pessoal!

Tenho um arquivo que usa duas formatações de data: "dd/mm/aaaa" e "mm/dd/aaaa"
Gostaria de saber como faço para a macro do excel descobrir qual a
formatação se encontra, e caso a formatação seja "mm/dd/aaaa" converter para
"dd/mm/aaaa".


obrigado!

Oi Whe,

tente assim:

Sub AlteraFormatacao(intervalo As Range)
Dim celula As Range

For Each celula In intervalo.Cells
If celula.NumberFormat = "mm/dd/yyyy" Then
celula.NumberFormat = "dd/mm/yyyy"
End If
Next celula
End Sub

--
Luiz Cláudio C. V. Rocha
Coordenador FórumAccess
São Paulo - Brasil
MVP Office
http://www.msmvps.com/officedev


"whe" escreveu:

> Olá pessoal!
>
> Tenho um arquivo que usa duas formatações de data: "dd/mm/aaaa" e "mm/dd/aaaa"
> Gostaria de saber como faço para a macro do excel descobrir qual a
> formatação se encontra, e caso a formatação seja "mm/dd/aaaa" converter para
> "dd/mm/aaaa".
>
>
> obrigado!
>