sorteo de datos

22/09/2004 - 05:40 por meilis25 | Informe spam
Hola alguien sabe com puedo sortear datos automaticamente?
es decir si tengo:
1
3
2
5
6
4
el sorteo seria
1
2
3
4
5
6
pero si yo agrego 7 en la promera lista me lo sortee

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
22/09/2004 - 07:51 | Informe spam
hola, meilis !

... sortear datos automaticamente? [...]



usando los eventos en el modulo de codigo de 'la hoja'... copia las siguientes lineas:
[click-derecho sobre la pestaña del nombre -> ver codigo...]

-> suponiendo que los numeros los ingresas en la columna 'A' ->SIN 'titulos' en la fila 1<-
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
Columns("a").Sort [a1], xlAscending
End Sub

-> suponiendo que los numeros los ingresas en la columna 'A' ->CON 'titulos' en la fila 1<-
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
Range([a2], [a65536].End(xlUp)).Sort [a2], xlAscending
End Sub

saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida