Ver Mensaje Individual
  #10 (permalink)  
Antiguo 14/08/2006, 07:30
Avatar de tazzito
tazzito
 
Fecha de Ingreso: agosto-2006
Mensajes: 381
Antigüedad: 17 años, 9 meses
Puntos: 2
mmmm creo que el lo que quiere es invertir solamente la grilla no ordenarla a traves de sql ni sort, osea en una columna de 4 filas el valor de la fila 1 quede en la 4 y la 2 en la 3 y viceversa, mmm veamos algo

With Grilla1
Largo = .rows-1 'Para sacar el total de filas
For x= 1 to cint(largo/2) 'Para Recorrerlo a la mitad
VarPaso = .textmatrix(x,1) 'si queremos cambiar la 1 Columna
.textmatrix (x,1) = .textmatrix (.rows-x, 1) 'Invierte su Posicion
.textmatrix (.rows-x, 1 )= VarPaso
Next x
End With

listo ahora si quieres cambiar todos los valores tendrias que alargarla un poco mas pero con la misma ciencia ;) espero te sirva