Hojas de cálculo en Excel - página principal

Ir a una celda de forma aleatoria

Esto quizás no sea demasiado útil, de cara a programar un macro, pero nos puede servir para saber como desplazarnos a determinada celda. En este caso, vamos a situarnos en una celda aleatoria, cada vez que ejecutemos el macro.

Antes de comenzar con el macro, informaros que en las versiones anteriores a Excel 2007 -aunque no en todas, pues las primeras versiones eran muy limitadas-, el número de columnas es de 256, y el número de filas es de 65.536. Excel 2007 hay un cambio sustancial, pues esta versión, admite 16.000 columnas y nada menos que 1.000.000 de filas, así que si
es ese tu caso, cambia los datos del macro, tal y como se indica en el mismo.


Sub celda_aleatoria()
'Iniciamos randomize para que funcione el Rnd
Randomize
'obtenemos un registro al azar, para lo cual,
'informamos primero de la fila inicial y final
'(para Excel 2007, cambiar estos datos)

fila_inicial = 1
fila_final = 65536
'lo mismo para las columnas
columna_inicial = 1
columna_final = 256
'generamos el número de la fila al azar
fila_elegida = Int((fila_final - fila_inicial + 1) * Rnd + fila_inicial)
'lo mismo para la columna
columna_elegida = Int((columna_final - columna_inicial + 1) * Rnd + columna_inicial)
'Nos situamos en la celda elegida
Cells(fila_elegida, columna_elegida).Select
End Sub



1 comentarios:

Salvador dijo...

¿Se podría eliminar una celda aleatoriamente? Si alguien sabe el código que lo escriba, por favor.