Ola amigos , muito obrigado pelas respostas, todas as 2 maneiras eu testei e obtive sucesso, muito obrigado.

@anderson nao sei viu amigo, pois acabei de formatar minha maquina agora, e quando instalei o Office 2016 pela primeira vez , começou a ficar estranho...

@edsonbr Fiz as alteraçoes no seu exemplo, ficou show de bola, muito obrigado por compartilhar seu conhecimento. Um forte abraço.

Eu tentei fazer um exemplo mas esta aparecendo um erro 'Tipos incompatíveis'. Alguém me ajuda ai?  Controle2020.xlsm

@edsonbr muito obrigado por responder. Mas foi o que eu pensei, procurei por dias algo que nao existe. Se alguem souber, por favor compartilhe seu ...

@anderson Obrigado amigo,

PERFEITO. Muito Obrigadoo! Deus te abençoe

srobles Este deu erro em tempo de execuçao 13': Tipos incompatíveis Na linha : .Range("T76") = CCur(dadosCadastrais(8)) do codigo a...