Un agregado mas....
cuando quise poner otros valores no pude como lo estaba haciendo,
En el text purpura debe ir la suma de los text azules, cuando lo quise hacer me pide debug.
lo intenté hacer asi:
Código HTML:
Private Sub TxtTArV_Change()
'TxtArt.Text = TxtTArV.Text
'TxtArt.Text = Val(TxtTArV)
End Sub
pero no funciona, por ello lo comenté.
Agradezco sus comentarios y ayuda