[Resolvido]Converter texto em Número

Bom dia.

estou tentando converter um campo de texto em número da seguinte forma.
1 - no campo texto tenho dados desta forma: "32x40" / "42x50" / "50x60"
2 - utilizei o replace e ficou PesoMat = "32*40" / "42*50" / "50*60"

'PesoMat = Replace(Me.Produto.Column(4), "X", "*")'

ou seja eu preciso que o texto 32x40 seja multiplicado como 32*40
e depois o resultado vou multiplicar por outros numeros ainda.

alguem pode me ajudar... ja tentei procurar algo no fórum mas não consegui encontrar nada.

Tente algo assim:

Código:

Dim S as Variant, T As Integer
S = Split(Me.NomeDoCampo, "x")
T = S(0) * S(1)

O Split divide o dado do campo na posição aonde está o "X". Como temos duas partes, temos os índices 0 e 1. Basta multiplicar essas duas partes na variável T.

Criquio muito obrigado pelo retorno.
Mas surgiu uma nova duvida, peço desculpas nao ter comentado antes, mas agora que fui avaliar melhor e tenho alguns dados que tem tres partes 25x34x09 por exemplo.

o Split funcionará por igual?
vou testar e ja retorno.

Criquio... funcionou muito bem para dois ou 3 blocos, mas ao juntar as duas formas no mesmo código ele da errao no S(2)

eu tentei utilizar o Nz(S(2),1), mas nao funfou.

Basta fazer um laço For... Next:

Código:

Dim S as Variant, T As Integer, N As Integer
S = Split(Me.NomeDoCampo, "x")

T = 1

For N = 0 To UBound(S)
    T = T * S(N)
Next

Demais.... muito obrigado Criquio....

Deu tudo certinho mesmo....
preciso aprender melhor a usar a função For e Next.

vou começar a treinar... um abraçao e um otimo dia.

desculpe, mas estou com uma pequena duvida. só para meu conhecimento.
por favor:
a função "uBound" serve exatamente para qual motivo?

O Split separa o(s) dados(s) pelo(s) caracter(es) que indicarmos. No caso, indicamos o X. Cada parte recebe um índice, assim como as colunas da uma combo ou listbox. O 0, ou a menor parte, pode ser referenciada pelo LBound e a maior parte pode ser referenciada pelo UBound. Como o nosso laço precisa percorrer todas as partes, pedimos que o procedimento seja realizado desde o vetor 0 até o maior, ou seja, UBound.

entendi. Muito obrigado.