Uma possibilidade simples:

Private Sub TextBox2_Change()
TextBox3.Value = TextBox2.Value * 1.3
TextBox4.Value = TextBox3.Value * TextBox1.Value
End Sub

Olá Reinaldo

Obrigado pela ajuda, funcionou perfeitamente, porém percebo que o valor da Textbox 4 só alteram quando eu altero o valor da Textbox 1 e 2 respextivamente...
Gostaria de saber se tem como as textbox 4 alterar o valor bastando eu alterar textbox 1 (quantidade)?

Desde já agradeço a atenção.

Edmaxy

inclua um evento TextBox1_Change, porem se não houver ainda valor em textBox3 podera dar erro então:

Private Sub TextBox1_Change()
If Textbox3.value <>"" then
TextBox4.Value = TextBox3.Value * TextBox1.Value
end if
End Sub

Obrigado Reinaldo,
Era isso mesmo que precisava.

Muito Grato mesmo.

Edmaxy.

Bom dia Reinaldo e pessoal do Forúm...

Reinaldo seu código funcionou perfeitamente no userform simples que postei como exemplo, porem quando fui inserir na planilha que pretendo usar está dando erro e não consegui reolver...
vou postar a planilha onde pretendo usar e as instruções:

os nomes das textbox referentes ao exemplo anterior são:

Textbox1 = txtquant
Textbox2 = txtcalorc
Textbox3 = txtvalor30
Textbox4 = txtvalort
as instruções as mesmas...
A princípio são essas minhas dificuldades.

no anexo da pra ver melhor o que preciso. esta planilha é uma adaptação que estou tentando fazer de um modelo encontrado em outro forum.

Desde já agradeço.

Edmaxy

Edmaxy, acrescentei o codigo abaixo e funcionou, basta formata-lo

Private Sub txtquant_Change()
If txtvalorc.Value <> "" And txtquant.Value <> "" Then
    txtvalort.Value = txtvalor30.Value * txtquant.Value
End If
End Sub

Private Sub txtvalorc_Change()
If txtvalorc.Value <> "" And txtquant.Value <> "" Then
    txtvalor30.Value = txtvalorc.Value * 1.3
    txtvalort.Value = txtvalor30.Value * txtquant.Value
End If
End Sub

Porem notei em seu projeto:
o campo Codigo tem no projeto um com nome TexCodigo e um TxtCodigo (que está escondido atraz do listview).
Para definir o proximo registro, vc utiliza usedrange.count; porem devido a inclusão e exclusão a range utilizada pode ficar maior do que os registros encontrados, então uma nova inclusão está direcionada para a ultima linha com valor (ou considerada com valor) e não imediatamente abaixo do ultimo registro

Reinaldo
Eu havia percebido isso depois que postei o arquivo mais campo codigo que está escondido(creio que pelo motivo do modelo original ter um contador automático) será excluído pois preciso do campo Código ativo e podendo ser alterado manualmente.
Alias como meus conhecimentos me VBA sou poucos se você puder me falar qual linha eu altero para que ele não faça mais essa contagem automática eu ficaria muito agradeçido

No demais vou alterar aqui e verificar se funciona

Desde já Agradeço.

Edmaxy