Tipos Incompátiveis VBA

Olá!

Estou fazendo uma variável inteira receber um valor numérico contido em uma variável string só que na hora que eu vou usar a variável inteira para calcular dá o seguinte erro:

Erro em tempo de execução 13 Tipos Incompativeis

Já tentei de tudo para dar certo o que posso fazer porque eu tenho que usar esta variável tipo string de qualquer maneira.