Cara muito obrigado por responder... como indicado mudei no combobox o Cdbl por Val e funcionou certinho, só esqueci de um detalhe, tem como limpar o combobox deixando em branco tbm para um novo cálculo??
Desculpe, quanto a segunda parte não entendi onde devo colocar ou alterar este código, como falei sou mais metido do q entendido, teria como explicar melhor onde coloco ou altero este código q passou pois eu colei ele no código e apresentou:
"Erro em tempo de execução '13':
Tipos incompatíveis
Segue código q colei:
Private Sub Peso1_Change()
Sub1 = CDbl(Tarifa1) * CDbl(Peso1)
End Sub
Upei novamente a planilha caso alguém precise já com a parte de limpeza dos campos funcionando, e vou upando ela conforme for mexendo e funcionando.
Agradeço desde já a ajuda, segue link para baixar a planilha http://www.gramadoavesornamentais.com.br/fretes.xls
Postado : 27/07/2012 5:54 pm