Seleccionar celdas hasta el final de una tabla

Vamos terminando con esta serie de códigos indispensables para practicar las macros de manipulación de celdas. En las siguientes entregas vamos a ver el código utilizado para seleccionar el rango de celdas de toda una columna de una tabla que es lo que también se puede realizar con la combinación de teclas Ctrl + Shift + Flecha hacia abajo. Tenemos la siguiente información:

Se trata de un pequeño listado de personas con información básica. La idea es que desde la celda A5 podamos seleccionar todos los datos de esta columna hasta el final de los datos, es decir, hasta la cédula 666666.

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 SeleccionarCeldasHastaelFinaldeTabla()

'Esta macro utiliza las propiedades de Selección y Desplazamiento en conjunto para seleccionar todas las celdas de una tabla hasta el final

Range("A5").Select

Range(ActiveCell, ActiveCell.End(xlDown)).Select

End Sub

Veamos la interpretación de cada línea.

  1. La primera línea Sub SeleccionarCeldasHastaelFinaldeTabla (), indica el inicio y nombre de la macro SeleccionarCeldasHastaelFinaldeTabla.
  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 estamos seleccionando la celda A5 que es donde se encuentra el encabezado de la primera columna de la tabla.
  4. En la cuarta línea estamos utilizando el Objeto Rango (Range) y de este utilizamos un objeto que es encuentra dentro que es la Celda Activa (ActiveCell), en este caso la A5, y de este último objeto tomamos la Propiedad Fin (End) que indica que vamos a desplazarnos hasta el final de una lista; esta propiedad tiene un Argumento que va entre paréntesis y es en el cual definimos la dirección del desplazamiento que en este caso es hacia abajo (xlDown). Por último establecemos el Método seleccionar (Select) para finalizar la instrucción.
  5. 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 en la hoja de Excel. En cualquier de los dos casos, el resultado de la macro es el siguiente:

Descargar archivo detrabajo.

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

Una opinión
  1. Carlos dice:

    y cuando no hay datos en una celda como hago para poder aplicar este metodo

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.