- 23 Out 2016 às 19:12
#16741
textbox1 com a seguinte informação: Data inicial (20/08/2010)
e na textbox2 já aparece-se a resposta conforma abaixo
Gostaria que a resposta aparece-se nesse formato: 6 ano e 2 mês
Sem estar na plataforma VBA a formula seria essa:
DATADIF(Data_inicial;Data_final;"y")&" ano e "&DATADIF(Data_inicial;Data_final);"ym")& " mês"
Estou usando:
If IsDate(textbox1) Then
textbox2 = DateDiff("yyyy", textbox1, Date) & " anos e " & DateDiff("m", textboxi, Date) & " mês"
End If
Porem a resposta aparece como 6 anos e 74 mês
Estou começando a mexer com VBA e confesso que estou fascinado, porem até chegar lá precisarei de tempo e muito estudo, desde já agradeço.
Atenciosamente,
Gilson
e na textbox2 já aparece-se a resposta conforma abaixo
Gostaria que a resposta aparece-se nesse formato: 6 ano e 2 mês
Sem estar na plataforma VBA a formula seria essa:
DATADIF(Data_inicial;Data_final;"y")&" ano e "&DATADIF(Data_inicial;Data_final);"ym")& " mês"

Estou usando:
If IsDate(textbox1) Then
textbox2 = DateDiff("yyyy", textbox1, Date) & " anos e " & DateDiff("m", textboxi, Date) & " mês"
End If
Porem a resposta aparece como 6 anos e 74 mês

Estou começando a mexer com VBA e confesso que estou fascinado, porem até chegar lá precisarei de tempo e muito estudo, desde já agradeço.
Atenciosamente,
Gilson
Editado pela última vez por Gilsonbaco em 24 Out 2016 às 09:57, em um total de 1 vez.