Ola cara, vou tentar te ajudar.
Se voce esta querendo extrair somente o ultimo caractere faça assim:
X = Right (TuaVariavel, 1)
'--------------------------------------------------------------------
Mas se voce quer pegar toda a variavel menos o ultimo caractere
faça assim -> X = Mid (TuaVariavel, 1, len (TuaVariavel - 1 ) )
'-----------------------------------------------------------------------------
Se não funcionar desta forma, tente transformar a tua variavel para VARIANT e depois execute esse exemplo novamente.
Atenciosamente,
Rodrigo Porto
