Formatar data

[Jefferson S.G.]

Caros,

um favor.

Quando salvo as alterações de uma célula que está vinculada a uma textbox a formatação altera.

Exemplo:

na textbox digito 19/05/2010, na célula aparece da mesma forma, sendo que eu formatei a célula no Excel para aparecer o formato "dd/mmm".

Tentei o comando

range("h1").numberformat = "dd/mmm"

porém, não deu certo. Na célula aparece o formato "dd/mmm" enquanto estou alterando na textbox, porém, quando confirmo a alteração, a célula volta a visualizar formato "dd/mm/yyyy", enquanto a formatação da célula no excel continua a mesma, ou seja "dd/mmm".

Alguém poderia me ajudar?

[João.Neto]

Tenta isso e nos confirme se funcionou:

Workbooks("Allan.xls").Worksheets("plan15").Range("b2") = Format(TextBox1.Value, "dd/mmm")

[Jefferson S.G.]

Como uma luva!

Muito obrigado. Solucionou dois problemas de uma só vez, pois a data de outra célula estava sendo convertida para formato americano "mm/dd/yyyy".

Muito obrigado João.Neto!