ODENAR ALEATORIAMENTE

Solo consultas sobre el nuevo Excel 2.007

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

ODENAR ALEATORIAMENTE

Notapor MARIANITEN » 22 May 2011 18:39

Soy nuevo en el foro, tome conocimiento del mismo buscando cómo resolver un problemita al que todavía no le encontré solución. Espero que alguien con mas conocimiento me pueda ayudar.
Tengo ordenados una serie de números del 0 al 999 en una tabla de 4 columnas por 250 filas en forma correlativa ascendente de izquierda a derecha y de arriba abajo, necesito obtener una tabla de las mismas características pero en donde los números estén ordenados aleatoriamente o mejor dicho "des-ordenados" pero que no estén duplicados. Digo ésto porque probé hacerlo con la función "=ALEATORIO.ENTRE(0;999)" y si bien los desordena, me repite algunos valores y por ende hay otros que son ignorados.
Espero haber podido ser claro con la explicación de mi problema y que algún
alma caritativa se apiade de mí y me ilumine con su sabiduría!!!!!!!!!! :lol: :lol:
Desde ya muchas gracias a todos, Mariano.-
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
MARIANITEN
Miembro Nuevo
Miembro Nuevo
 
Registrado: 20 May 2011 17:22

Re: ODENAR ALEATORIAMENTE

Notapor HBanchieri » 22 May 2011 20:43

Hola,
Seguramente haciendo uso de macro se podrá obtener el mismo resultado pero mientras la macro no se presenta te dejo un modelo con fórmulas ALEATORIO y JERARQUIA.
Saludos.
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
HBanchieri
Miembro Frecuente
Miembro Frecuente
 
Registrado: 20 Mar 2011 00:33
Ubicación: Sta. Cruz - Bolivia

Re: ODENAR ALEATORIAMENTE

Notapor Héctor Miguel » 24 May 2011 00:31

hola, chicos !

la opcion de macros podria ser +/- como la siguiente (250 filas x 4 columnas iniciando en [B2]):
Código: Seleccionar todo
Sub Ale_500()
  Dim NA As New Collection, Ale As Integer, _
         n As Integer, Celda As Range
  Do
    On Error Resume Next
    Ale = Int(Rnd * 1000)
    NA.Add Ale, CStr(Ale)
  Loop Until NA.Count = 1000
  Application.ScreenUpdating = False
  For Each Celda In Range("b2").Resize(250, 4)
    n = n + 1
    Celda = NA(n)
  Next
End Sub

saludos,
hector.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Héctor Miguel
Miembro Frecuente
Miembro Frecuente
 
Registrado: 26 Mar 2005 18:31

Re: ODENAR ALEATORIAMENTE

Notapor xpelos » 21 Nov 2011 21:32

Hola, MARIANITEN

En lugar de usar ALEATORIO.ENTRE(), usa ALEATORIO() en una columna auxiliar. Eso genera una serie de números del orden 0.367518455297962 (virtualmente imposible de repetir en una corta serie de 250 sucesos) en lugar de números de rango 0...999.

Una vez generados a lo largo del rango, haces un copiar -pegado especial (valores) de los valores aleatorios obtenidos, y ordenas todos los datos conforme a esa columan auxiliar. Una vez 're-ordenados' todos los datos, puedes eliminar la columna auxiliar.

Para observar lo que asevero en el primer párrafo, puedes usar la función =ALEATORIO() y luego, en la celda donde la hayas situado, le das a [F2], para editar la fórmula, y te habrás situado al final de la fórmula. Ahora le das a [F9] y verás la serie completa del número aleatorio como tal, que habrá quedado fijado, y no aparecerá la fórmula.

Un saludo a todos.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
xpelos
Miembro Frecuente
Miembro Frecuente
 
Registrado: 18 Ene 2006 12:39


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Excel 2.007

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 2 invitados