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 de Adriel Ortiz Mangia
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 Subvalora para finalizar saludos!
