Você já sabe como armazenar textos, numeros e datas?

Até então estávamos lidando com variáveis armazenando números e trabalhando com estes.
Mas talvez você  queira abrir mais as possibilidades, e queira que no resultado exiba além do número um texto que acompanhe.

Agora cabe acrescentar que as variáveis de textos não armazenam números juntos da mesma forma e mesma coisa vale para data.

Um exemplo rápido para exemplificar:

Você monta um formulário onde existe um campo que solicita a data de aniversário, e como resposta de um relatório você deseja apresentar a idade. Com este exemplo vamos ver as 3 formas de armazenamento e no final como armazenar texto e número juntos usando conversão.

 

Código  Armazenar Textos, Numeros e Datas

 

Sub Macro1()

'armazena o valor (value) da célula,  o aniversário
aniver = Cells(2, 2).Value

'abaixo na mesma variavel eu substituo o próprio valor, gravando somente o ano (year)
aniver = Year(aniver)

'crio uma variável (hoje) que armazena a data de hoje de seu pc
hoje = Date

'na mesma variável, eu substituo o próprio valor, mas gravando somente o ano
hoje = Year(hoje)

'.calculo a diferença entre  anos para ver a idade (armazeno número)
idade = hoje - aniver

'ate então foram armazenados somente valores...
' na celula "B3" vamos apresentar ou armazenar texto, note que para texto é necessário usar aspas
' e como não há como juntar textos e números, a idade foi convertida pra texto

Cells(3, 2).Value = "Você possui " + CStr(idade) + " anos"
End Sub