none
URGENTE AYUDA PORFAVOR RRS feed

  • Pregunta

  • ESTIMADOS AMIGOS

    ESTO ES EN EXCEL

    ALGUIEN CONOCE DE ALGUNA FORMULA PARA COLOCAR NUMEROS ALEATORIOS DEL 1 AL 75

    EN UNA FILA SIN QUE SE REPITA ALGUN NUMERO.

    SALUDOS 


    ______________________________________ Mario Valderrama Ingeniero De Ejecucion En Informatica Santiago, Chile

    jueves, 24 de mayo de 2012 14:40

Respuestas

  • Puedes hacerlo fácilmente con una macro, como esta:

    Private Sub randomFila()
        Dim sel, numeros(75) As Integer
        For iCnt = 1 To 75
            numeros(iCnt) = iCnt
        Next
        For iCnt = 75 To 1 Step -1
            sel = Int((iCnt - 1 + 1) * Rnd + 1)
            Worksheets(1).Cells(1, iCnt).Value = numeros(sel)
            numeros(sel) = numeros(iCnt)
        Next
    End Sub

    Saludos.
    • Marcado como respuesta MarioChep miércoles, 27 de junio de 2012 7:08
    jueves, 24 de mayo de 2012 16:07
  • Tendrías que ir insertando en una tabla temporal o en un objeto Dictionary (mas rápido).

    SI ya existe un registro idéntico, un tratamiento de error vuelve a la rutina a generar nuevos números y el ciclo se repite hasta completar lo requerido.

    • Marcado como respuesta MarioChep miércoles, 27 de junio de 2012 7:08
    domingo, 27 de mayo de 2012 13:57

Todas las respuestas

  • Puedes hacerlo fácilmente con una macro, como esta:

    Private Sub randomFila()
        Dim sel, numeros(75) As Integer
        For iCnt = 1 To 75
            numeros(iCnt) = iCnt
        Next
        For iCnt = 75 To 1 Step -1
            sel = Int((iCnt - 1 + 1) * Rnd + 1)
            Worksheets(1).Cells(1, iCnt).Value = numeros(sel)
            numeros(sel) = numeros(iCnt)
        Next
    End Sub

    Saludos.
    • Marcado como respuesta MarioChep miércoles, 27 de junio de 2012 7:08
    jueves, 24 de mayo de 2012 16:07
  • estimados..

    ahora bien ... tengo una planilla de 12000 filas y 25 columnas, con esta elaboro un bingo.

    el bingo es de 25 numeros, que van del 1 al 75

    cada columna de este van los numeros  de la siguiente manera

    |1-15|16-30|31-45|46-60| 61-75|

    |1-15|16-30|31-45|46-60| 61-75|

    |1-15|16-30|31-45|46-60| 61-75|

    |1-15|16-30|31-45|46-60| 61-75|

    |1-15|16-30|31-45|46-60| 61-75|

    como puedo hacer que no se repitan los numeros .. 

    saludos.


    ______________________________________ Mario Valderrama Ingeniero De Ejecucion En Informatica Santiago, Chile

    jueves, 24 de mayo de 2012 16:25
  • Tendrías que ir insertando en una tabla temporal o en un objeto Dictionary (mas rápido).

    SI ya existe un registro idéntico, un tratamiento de error vuelve a la rutina a generar nuevos números y el ciclo se repite hasta completar lo requerido.

    • Marcado como respuesta MarioChep miércoles, 27 de junio de 2012 7:08
    domingo, 27 de mayo de 2012 13:57