Desde la celda activa hasta la última entrada en Excel VBA

buen día, soy Miguel y hoy os traigo un nuevo post.

Este ejemplo ilustra la propiedad End del objeto Range en Excel VBA. Usaremos esta propiedad para seleccionar el rango desde la celda activa hasta la última entrada en una columna.

Localización:

Algunas cifras de ventas en la columna A. Suponga que está sumando más cifras de ventas a lo largo del tiempo.

Desde la celda activa hasta la última entrada en Excel VBA

Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:

1. Para seleccionar la última entrada en una columna, simplemente agregue la siguiente línea de código:

Rango ("A5"). Aleta (xlDown). Seleccione

Nota: En lugar de Scope ("A5"), también puede utilizar Scope ("A1"), Scope ("A2"), etc. Esta línea de código es equivalente a presionar END DATE + DOWN.

Resultado al hacer clic en el botón de comando de la hoja:

Última entrada

2. Para seleccionar el rango desde la celda A5 hasta la última entrada de la columna, agregue la siguiente línea de código:

Alcance (Alcance ("A5"), Alcance ("A5"). Fin (xlDown)). Seleccione

Resultado al hacer clic en el botón de comando de la hoja:

Desde la celda A5 hasta la última entrada

3. Para seleccionar el rango desde la celda activa hasta la entrada de la última columna, simplemente reemplace el rango ("A5") con ActiveCell.

Rango (ActiveCell, ActiveCell.End (xlDown)). Seleccione

Resultado cuando selecciona la celda A2 y hace clic en el botón de comando de hoja:

Desde la celda activa hasta el último resultado de entrada

Nota: Puede usar las constantes xlUp, xlToRight y xlToLeft para moverse en las otras direcciones. De esta forma, puede seleccionar un rango desde la celda activa hasta la última entrada de una fila.

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Subir

Esta página utiliza Cookies. Más info