Ver Mensaje Individual
  #12 (permalink)  
Antiguo 14/03/2009, 11:16
Avellaneda
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 3 meses
Puntos: 37
Respuesta: Comparacion de Columnas

Cita:
Iniciado por acc008 Ver Mensaje
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.