Mostrar valor de celda si cumple 2 condiciones en Formulario

Retomando una pregunta realizada.

La consulta que tengo es para el formulario en el que trabajo.

Private Sub txt_totalventas_Change()
If ComboBox2 = "1" And ComboBox3 = "2" Then
txt_totalventas = Val("c63").Value

El txt_totalventas depende de los datos de combobox 2 y 3 si se cumple ambas condiciones este deveria mostrarme el valor de la celda que especifico .

Lo e montado de diferentes maneras pero no me da el resultado que quiero.

2 respuestas

Respuesta
1

H o l a 

te paso la macro 

Private Sub ComboBox1_Change()
Call mostrar
End Sub
Private Sub ComboBox2_Change()
Call mostrar
End Sub
Sub mostrar()
If ComboBox1 = "" And ComboBox2 = "" Then Exit Sub
If ComboBox1 = -1 And ComboBox2 = -1 Then Exit Sub
If ComboBox1 = 1 And ComboBox2 = 2 Then
TextBox1 = Sheets("Hoja1").Range("A1").Value
End If
End Sub

valora para finalizar saludos!

Respuesta
1

Solamente cambia

Val("c63").Value

por Range("c63").value

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas