[Resolvido]Ajuda - calculo errado no VBA + Formulário

Olá Amigos, gostaria de sua ajuda se possível, montei um formulário que usa um VBA para calculo para definir qual é o custo do veiculo por município, porém o VBA está fazendo um calculo totalmente errado e eu não consigo descobri o erro, não sei se deveria utilizar outro formato para chegar ao resultado, se puderem olhar e dar uma dica eu agradeço.

Exemplo: 600 kgs  Nota fiscal R$ 18.000,00

No access ele calcula exemplo: Km Cargo   R$ 8.729,60
                                            Family:      R$ 9.055,20
Transporte Rodoviário              1500:        R$ 9.331,00

Porém o correto seria:
                                            Km Cargo:    R$ 952,16
                                            Family:         R$ 347,20
Transporte Rodoviário              1500:          deveria ser vazio, porque não tem o valor na tabela.

tentei anexar o arquivo completo porém ele tem 20 MB não foi possivel, estou anexando apenas o script.

Abs,

Pessoal, obrigado por toda atenção, descobri o erro. abs,