Cuando ejecutamos un macro, normalmente nos encontramos con que hemos aparecido en una celda que no es aquella donde estábamos inicialmente. Por ejemplo, si estamos situados en B7, y ejecutamos un macro que hace determinadas operaciones, puede que aparezcamos en la ceda J45, porque esa es la última celda en la que hemos hecho alguna operación.
Si deseamos volver a la celda donde estábamos inicialmente, de tal forma que parezca que no nos hemos movido del sitio, tan solo tendremos que utilizar ese código:
| Sub recorrer_fila() 'Ocultamos el procedimiento Application.ScreenUpdating = false 'Creamos una variable, para volver a esta posición, 'es decir, vamos a "fichar" la celda en la que 'estamos inicialmente micelda = ActiveCell.Address 'Aquí irían el resto de las líneas de nuestro 'código, con todo aquello que queramos hacer 'bla, bla, bla 'bla, bla, bla 'bla, bla, bla 'Ahora volvemos a donde estábamos inicialmente Range(micelda).Select 'Mostramos el procedimiento Application.ScreenUpdating = false |
Como veis, la propiedad Address, nos puede servir para almacenar en memoria, la celda donde estamos inicialmente, antes de recorrer filas, borrar datos, insertar cifras, etc.
¿Verdad que no tiene ninguna complicación?.
1 comentarios:
Un aporte sencillo pero poderoso cuando hacemos macros complejas. Estamos a la espera de su retorno maestro, necesitamos personas como usted para seguir aprendiendo.
Gracias
Publicar un comentario