Desplazar celda activa hacia la derecha

Vimos en las dos entregas anteriores como utilizar la propiedad Offset de la celda Activa para realizar el desplazamiento de la celda activa hacia abajo (dando el valor de 1 en el argumento Fila) y hacia arriba (dando el valor -1 en el argumento Fila); así que la idea general es que para realizar desplazamiento hacia arriba o hacia abajo, solo debemos modificar el argumento Fila de la propiedad Offset. En esta entrega vamos a ver cómo realizar el desplazamiento hacia la derecha y para ello ya no vamos a utilizar el argumento Fila sino el argumento Columna. Primero voy a explicar de nuevo el código que utilizaremos en las siguientes entregas y que nos servirá para realizar cualquier tipo de desplazamiento:

ActiveCell.Offset(Filas, Columnas).Select

Esta instrucción lo que hace es partir desde la celda activa (ActiveCell) de donde utiliza la propiedad de desplazamiento (Offset). Para indicar en qué dirección y la cantidad de celdas se debe utilizar los argumentos Filas y Columnas que tenemos entre paréntesis de la siguiente manera:

  • Si el valor en Filas en positivo lo que estamos indicando es que el desplazamiento es hacia abajo ()
  • Si el valor en Filas en negativo lo que estamos indicando es que el desplazamiento es hacia arriba. ()
  • Si el valor en Filas en igual a cero (0) lo que estamos indicando es que no se realizará un desplazamiento en las Filas.

 

  • Si el valor en Columnas en positivo lo que estamos indicando es que el desplazamiento es hacia la derecha. ()
  • Si el valor en Columnas en negativo lo que estamos indicando es que el desplazamiento es hacia la izquierda. ().
  • Si el valor en Columnas en igual a cero (0) lo que estamos indicando es que no se realizará un desplazamiento en las Columnas.

Vamos a ver ahora como utilizar este código para realizar un desplazamiento hacia la derecha desde la celda activa. Abrimos el editor de Visual Basic (Alt + F11) y damos doble clic sobre la Hoja1 en el explorador de proyectos para activar el espacio de edición de macros en el editor:

Nos vamos a ubicar en el espacio de edición de macros y copiamos el siguiente código:

Sub DesplazarCeldaActivaHacialaDerecha()

'Esta macro utiliza la propiedad de desplazamiento de la celda Activa para desplazarse hacia la Derecha

ActiveCell.Offset(0, 1).Select

End Sub

Veamos la interpretación de cada línea.

  1. La primera línea Sub DesplazarCeldaActivaHacialaDerecha (), indica el inicio y nombre de la macro DesplazarCeldaActivaHacialaDerecha.
  2. La segunda línea que iniciar con una coma sencilla es un comentario informativo para identificar más fácil lo que realizará la macro y en el Editor VB se marcará en color verde toda la línea.
  3. La tercera línea es donde aplicamos la propiedad desplazamiento (Offset) del objeto celda activa (ActiveCell) y en el argumento de Columna indicamos el valor 1 para que el desplazamiento sea de a una columna; como el valor esta en positivo, significa que se realizará un desplazamiento hacia la derecha. En el argumento Fila el valor es 0 lo que significa que el desplazamiento será en la misma Fila donde se encuentra la celda activa
  4. La última línea marca el fin (End) de la Macro o Subrutina (Sub)

Si queremos ejecutar la macro desde el Editor de Visual Basic, es necesario que el cursor este ubicado en cualquiera de las líneas de la macro y luego damos F5. La otra alternativa es vincular la macro a una autoforma de flecha en la hoja de Excel. En cualquier de los dos casos, el resultado de la macro es el siguiente:

Al dar clic en la flecha se desplaza a la celda D8:

Y así podemos continuar con el desplazamiento hasta donde se requiera.

Descargar archivo de trabajo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc. Lo que no está permitido es insultar o escribir palabras ofensivas o soeces. Si lo hace, su comentario será rechazado por el sistema o será eliminado por el administrador. Por último, trate de no escribir en mayúscula sostenida, resulta muy difícil leerle.