Tabla de contenido
Este tutorial demostrará 8 ejemplos de uso VBA para seleccionar el Gama Usada en una columna en excel. Generalmente, el UsadosRange en Excel representa la parte de una hoja de cálculo que contiene datos. Para ilustrar los ejemplos con claridad, aplicaremos la propiedad Rangos usados en un conjunto de datos concreto para todos los ejemplos.
Descargar el cuaderno de prácticas
Podemos descargar el cuaderno de prácticas desde aquí.
VBA para seleccionar UsedRange en Column.xlsm8 Ejemplos Fáciles de VBA para Seleccionar el Rango Usado en una Columna
En la siguiente imagen, podemos ver el conjunto de datos que utilizaremos para todos los ejemplos. El conjunto de datos contiene los nombres de Vendedores su Ubicación , Región, y ' Importe total En este conjunto de datos, el intervalo utilizado se considerará incluido el encabezamiento. Así, el intervalo utilizado en el siguiente conjunto de datos es ( B2:E15 ).
1. Seleccione UsedRange en la columna con VBA en Excel
En primer lugar, seleccionaremos todas las columnas de nuestro conjunto de datos. Para ello utilizaremos la función VBA seleccione Rangos usados en columnas. Veamos los pasos para realizar este método.
PASOS:
- Para empezar, haga clic con el botón derecho del ratón en en la hoja activa llamada ' Seleccionar_Columnas '.
- Además, seleccione la opción ' Ver Código '.
- A continuación, la acción anterior abre un espacio en blanco VBA También podemos obtener esta ventana de código pulsando Alt + F11 .
- A continuación, escriba el siguiente código en esa ventana de código:
Sub Select_Columns() Sheets("Select_Columns").Select ActiveSheet.UsedRange.Select End Sub - A continuación, haga clic en el botón Ejecutar o pulse la tecla F5 para ejecutar el código.
- Por último, obtenemos un resultado como el de la siguiente imagen. Podemos ver que el rango utilizado en las columnas de nuestro conjunto de datos está ahora seleccionado.
2. Utilice VBA para copiar todo UsedRange en la columna
En el segundo ejemplo, utilizaremos VBA para copiar todo el rango usado en las columnas de nuestro conjunto de datos. Generalmente, usamos este método para copiar una región específica de nuestro conjunto de datos. Necesitamos seguir los siguientes pasos para realizar este método.
PASOS:
- En primer lugar, vaya a la pestaña de la hoja de cálculo activa denominada ' Copia '.
- Siguiente, haga clic con el botón derecho del ratón en en esa pestaña y seleccione la opción ' Ver Código '.
- Se abrirá un espacio en blanco VBA de la hoja de cálculo actual. Otra forma de obtener esta ventana es pulsar Alt + F11 desde el teclado.
- A continuación, inserte el código siguiente en esa ventana de código:
Sub Copy_UsedRange() ActiveSheet.UsedRange.Copy End Sub - Ahora, para ejecutar el código haga clic en el botón Ejecutar o pulse la tecla F5 llave.
- Finalmente, podemos ver el resultado como el siguiente. Además, podemos ver un borde alrededor del rango utilizado. Indica que el código ha copiado los datos dentro de este borde.
Read More: Excel VBA: Copiar Rango Dinámico a Otro Libro
3. Contar el Número de Columnas en UsedRange Usando VBA
En el tercer ejemplo, contaremos el número de columnas de nuestro conjunto de datos utilizando el programa excel VBA seleccione Gama Usada en la columna. Este ejemplo devolverá el número total de columnas dentro del rango utilizado en nuestro conjunto de datos en un cuadro de mensaje. Siga los siguientes pasos para ejecutar este método.
PASOS:
- En primer lugar, seleccione la hoja activa denominada ' Contar_Columnas '.
- En segundo lugar, haga clic con el botón derecho del ratón en en el nombre de la hoja activa y haga clic en la opción ' Ver Código '.
- El comando anterior abre un espacio en blanco VBA de la hoja de cálculo activa. También podemos obtener la ventana de código pulsando Alt + F11 desde el teclado.
- En tercer lugar, introduzca el siguiente código en esa ventana de código en blanco:
Sub Count_Columns() MsgBox ActiveSheet.UsedRange.Columns.Count End Sub - A continuación, haga clic en el botón Ejecutar o pulse la tecla F5 para ejecutar el código.
- Por último, obtenemos el resultado en un cuadro de mensaje. El número de columnas del rango utilizado es 4 .
Read More: Cómo utilizar VBA para contar filas en el rango con los datos en Excel (5 macros)
4. Excel VBA para contar el número de la última columna en el rango utilizado
En el método anterior, extrajimos el número de la última columna del rango utilizado. Sin embargo, en este ejemplo, determinaremos el número de la última columna del rango utilizado en toda la hoja de cálculo utilizando la función VBA seleccione UsadosRange Veamos los pasos que debemos seguir para realizar esta acción.
PASOS:
- Para empezar, haga clic con el botón derecho del ratón en en la hoja activa llamada ' Última columna '.
- A continuación, seleccione la opción ' Ver Código '.
- Así, el comando anterior abre un espacio en blanco VBA Una forma alternativa de abrir esa ventana de código es pulsar Alt + F11 .
- Después, inserta el siguiente código en esa ventana de código:
Sub Column_Last() Dim Column_Last As Integer Column_Last = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column MsgBox Column_Last End Sub - Ahora, haga clic en el botón Ejecutar o pulse la tecla F5 para ejecutar el código.
- Al final, obtenemos nuestro resultado en un cuadro de mensaje. La última columna del intervalo utilizado es la columna Quinto de la hoja de cálculo.
Lecturas similares
- Cómo utilizar VBA para cada fila de un rango en Excel
- Usar VBA para Seleccionar Rango desde Celda Activa en Excel (3 Métodos)
- Macro Excel: Ordenar Varias Columnas con Rango Dinámico (4 Métodos)
5. Seleccionar la última celda de la última columna de UsedRange con VBA
En el quinto ejemplo, utilizaremos la función VBA seleccione Gama Usada para seleccionar la última celda de la última columna en una hoja de Excel. Para ilustrar este ejemplo, continuaremos con nuestro conjunto de datos anterior. Ahora, echa un vistazo a los pasos para realizar este método.
PASOS:
- En primer lugar, seleccione la hoja activa denominada ' Última_celda '.
- Siguiente, haga clic con el botón derecho del ratón en en ese nombre de hoja. Seleccione la opción ' Ver Código '.
- Entonces, obtenemos un espacio en blanco VBA Además, podemos pulsar Alt + F11 para abrir esa ventana de código.
- Después de eso, escriba el siguiente código en esa ventana de código:
Sub Last_Cell_UsedRange() Dim wcol As Long Dim wrow As Long wrow = ActiveSheet.UsedRange.Rows.Count wcol = ActiveSheet.UsedRange.Columns.Count ActiveSheet.UsedRange.Select Selection.Cells(wrow, wcol).Select End Sub - Ahora, para ejecutar el código haga clic en el botón Ejecutar o pulse la tecla F5 .
- Finalmente, podemos ver el resultado en la siguiente imagen. La última celda seleccionada de la última columna es la celda E15 .
6. Buscar rango de celdas de UsedRange seleccionado con Excel VBA
En este ejemplo, aplicaremos VBA para encontrar el rango de celdas del rango utilizado seleccionado en una hoja de cálculo de Excel. Utilizaremos la función VBA para todas las columnas de nuestro rango usado. El código devolverá el rango de celdas así como la dirección de la columna en el rango usado. Siga los siguientes pasos para realizar esta acción.
PASOS:
- Al principio, haga clic con el botón derecho del ratón en en la pestaña de la hoja activa llamada ' Buscar rango de celdas '.
- En segundo lugar, seleccione la opción ' Ver Código '.
- Se abrirá un espacio en blanco VBA Otro método para abrir esta ventana de código es pulsar Alt + F11 .
- En tercer lugar, introduce el siguiente código en esa ventana de código:
Sub Find_UsedRange() MsgBox ActiveSheet.UsedRange.Address End Sub - A continuación, para ejecutar el código, haga clic en el botón Ejecutar o pulse la tecla F5 llave.
- Al final, un cuadro de mensaje como el de la siguiente imagen muestra el resultado.
Lecturas similares
- VBA para Recorrer Filas y Columnas de un Rango en Excel (5 Ejemplos)
- Cómo convertir rango a matriz en Excel VBA (3 maneras)
7. Insertar la propiedad UsedRange de VBA para contar las celdas vacías
En este ejemplo, utilizaremos la función VBA seleccione UsadosRange para contar las celdas vacías en una hoja de Excel. A veces podemos tener celdas vacías en el rango utilizado de nuestro conjunto de datos. Podemos contar fácilmente el número de esas celdas vacías utilizando la propiedad UsadosRange Veamos los pasos para realizar este ejemplo.
PASOS:
- Primero, haga clic con el botón derecho del ratón en en la pestaña de la hoja activa llamada ' Celdas_vacías '.
- A continuación, seleccione la opción ' Ver Código '.
- La acción anterior abre un espacio en blanco VBA Una forma alternativa de abrir esa ventana de código es pulsar Alt + F11 .
- A continuación, inserta el siguiente código en esa ventana de código:
Sub Count_Empty_Cells() Dim wCell As Range Dim wRange As Range Dim d As Long Dim j As Long Set wRange = ActiveSheet.UsedRange For Each wCell In ActiveSheet.UsedRange d = d + 1 If IsEmpty(wCell) = True Then j = j + 1 End If Next wCell MsgBox "Total number of used cell(s)in 4 used columns is " & d & _ " and out of those " & _ j & " cell(s) are empty." End Sub - A continuación, haga clic en Ejecutar o pulse la tecla F5 para ejecutar el código.
- Finalmente, obtendremos el resultado en el cuadro de mensaje. El cuadro de mensaje mostrará el número de celdas totales y celdas en blanco en nuestro rango utilizado.
8. VBA UsedRange para localizar la primera celda vacía en la columna en Excel
En el último ejemplo, utilizaremos el excel VBA para seleccionar el Gama Usada en la columna para localizar la primera celda vacía en nuestra hoja de cálculo Excel. Este método localizará la primera celda vacía de una columna en particular. La celda vacía siempre estará fuera del rango utilizado del conjunto de datos. Por lo tanto, si alguna celda está en blanco o vacía en el rango utilizado, no se tendrá en cuenta en este método. Ahora, siga los siguientes pasos para realizar este método.
PASOS:
- Para empezar, haga clic con el botón derecho del ratón en en la pestaña de la hoja activa llamada ' Primer_vacío '.
- Además, seleccione la opción ' Ver Código '.
- Se abrirá un espacio en blanco VBA También podemos pulsar Alt + F11 para abrir esa ventana de código.
- Además, escriba el siguiente código en el espacio en blanco VBA ventana de código:
Public Sub Primera_Celda_Vacía() ActiveSheet.Range("E" & ActiveSheet.Rows.Count) _ .End(xlUp).Offset(1, 0).Value = "PrimeraCelda_Vacía" End Sub - A continuación, para ejecutar el código, haga clic en el botón Ejecutar o pulse la tecla F5 llave.
- Por último, el código anterior insertará el valor ' PrimeraCeldaVacía en la celda E16 Es la primera celda vacía de la columna E después del intervalo utilizado del conjunto de datos.
Read More: Excel VBA para recorrer el rango hasta la celda vacía (4 Ejemplos)
Conclusión
En pocas palabras, este tutorial muestra 8 ejemplos para utilizar el VBA seleccione UsadosRange en una hoja de Excel. Para poner a prueba tus conocimientos, descárgate la hoja de ejercicios de práctica utilizada para este artículo. Si tienes alguna duda, no dudes en comentar en el recuadro de abajo. Nuestro equipo intentará responder a tu mensaje lo antes posible. Sigue atento a más innovaciones Microsoft Excel soluciones en el futuro.
