Hola amigos tengo un userform con 4 texbox, en el texbox1 coloco un numero entero , en el texbox2 un numero decimal y en el texbox3 un numero en fracción, algo parecido a esto: 2 x 1.5 x 1/2 y cuyo resultado lo debe dar en el texbox4 (el resultado seria en este caso 1.5) estoy usando esta macro pero me marca error. Alguien podra ayudarme de favor.
Private Sub CommandButton1_Click()
TextBox4.Value = CDbl(TextBox1) * CDbl(TextBox2) * CDbl(TextBox3)
End Sub
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Hola amigos tengo un userform con 4 texbox, en el texbox1 coloco un numero entero , en el texbox2 un numero decimal y en el texbox3 un numero en fracción, algo parecido a esto: 2 x 1.5 x 1/2 y cuyo resultado lo debe dar en el texbox4 (el resultado seria en este caso 1.5) estoy usando esta macro pero me marca error. Alguien podra ayudarme de favor.
Private Sub CommandButton1_Click() TextBox4.Value = CDbl(TextBox1) * CDbl(TextBox2) * CDbl(TextBox3) End Sub