Con este macro te situarás en una celda aleatoriamente. En Excel XP las filas son 256, y las columnas son 65536. Creo que Excel 2003 es igual, pero creo que en Excel 2007 son más, aunque no tengo ni idea. Sí usas la última versión deberás modificar esos datos del macro.
Código:
Sub registro_aleatorio()
'Iniciamos randomize para que funcione el Rnd
Randomize
'obtenemos un registro al azar, para lo cual, informamos primero
'de la fila inicial y final
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
'le agradecemos el macro a 3pies
' :-)
End Sub
Salu2