Cita:
Iniciado por acc008
Bueno al final logre lo que queria.
lo que hize fue publicar una variable para cada proveedor y luego las compare en un if:
Código:
Private Sub Grilla_Click()
Precio1 = Grilla.TextMatrix(Grilla.RowSel, 3)
Precio2 = Grilla.TextMatrix(Grilla.RowSel, 4)
Txt1.Text = Grilla.TextMatrix(Grilla.RowSel, 1)
If Precio1 < Precio2 Then
Txt2.Text = "Avangard"
Txt3.Text = Grilla.TextMatrix(Grilla.RowSel, 3)
Else
Txt2.Text = "AT&T"
Txt3.Text = Grilla.TextMatrix(Grilla.RowSel, 4)
End If
eso es un ejemplo que hize para probar usando solo 2 proveedores y me funciona bien :D.
Igualmente muchas gracias por su ayuda.. seguramente voy a postear otra vez :P.
Suerte !
¿Y eso así hasta 15 proveedores?, será un código enorme.
En el código que te puse anteriormente sólo tienes que dimensionar la matriz al número de proveedores y el resto del código no varía:
Dim a(NumProveedores, 1)
Por cierto, que no indicas el porqué no funciona.