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:
¿Se podría eliminar una celda aleatoriamente? Si alguien sabe el código que lo escriba, por favor.
Publicar un comentario