Ejercicios con la Propiedad Row y Column de VBA

🔴 Ejercicios con la propiedad Rows y Columns, aquí nosotros podemos Seleccionar, insertar, eliminar y desplazarnos entre las celdas, filas y rangos con la propiedad Fila y Columna. Te muestro a continuación una serie de casos y ejemplos del uso de la propiedad Rows y Columns.

Propiedad Row y Column de VBA

✅ En este apartado veremos algunos ejercicios y casos diferentes para el uso de la Propiedad Rows y la Propiedad Columns de los Objetos Range o también podríamos utilizar el Objeto Cells.

Entendamos lo siguiente:

Rows = Filas
Columns = Columnas

Propiedad Rows

✅ Nos permite seleccionar filas, insertar filas, nos permite eliminar filas y también podremos movernos dentro de estas filas.

Propiedad Columns

✅ Permite movernos en las columnas, permite agregar columnas, permite eliminar columnas, entre otras.

Seleccionar Filas y Columnas

Ejercicio 1 Propiedad Rows y Select

Sub PropiedadRowsColumns()
Range(“A1”).Rows(3).Select
End Sub

Ejercicio 2 Propiedad Rows y Select

Sub PropiedadRowsColumns()
Range(“A1”).Rows(3).Select
End Sub

Ejercicio 3 Propiedad Rows y Select

Sub PropiedadRowsColumns()
Range(“A3:B10”).Rows(3).Select
End Sub

Ejercicio 4 Propiedad Columns y Select

Sub PropiedadRowsColumns()
Range(“A1”).Columns(3).Select
End Sub

Ejercicio 5 Propiedad Columns y Select

Sub PropiedadRowsColumns()
Range(“A3:D10”).Columns(2).Select
End Sub

Referencia a una hoja con WorkSheets y Sheets

Diferencias entre WorkSheets y Sheets

WorkSheets	Sheets
No puede manipular hojas de gráficos	Puede manipular hojas de gráficos

Ejercicio 6

En el siguiente ejercicio Sheet va seleccionar la Hoja1 y Rows la fila 3.

Sub PropiedadRowsColumns()
Sheets(“A1”).Rows(3).Select
End Sub

Ejercicio 7

En el siguiente ejercicio Sheet va seleccionar la Hoja1 y Comlumns seleccionará la columna 3.

Sub PropiedadRowsColumns()
Sheets(“Hoja1”).Columns(3).Select
End Sub

Insertar Filas y Columnas

Ejercicio 8

Vamos a insertar una celda.

Sub PropiedadRowsColumns()
Range(“A1”).Rows(3).Insert
End Sub

Ejercicio 9

Vamos a insertar una fila en Hoja1.

Sub PropiedadRowsColumns()
Sheets(“Hoja1”).Rows(4).Insert
End Sub

Ejercicio 10

Vamos a insertar una columna.

Sub PropiedadRowsColumns()
Sheets(“Hoja1”).Columns(4).Insert
End Sub

Ejercicio 11

Insertar una columna con Rango específico.

Sub PropiedadRowsColumns()
Range(“A3:D10”).Columns(2).Insert
End Sub

Eliminar Filas y Columnas

Ejercicio 12

Vamos a eliminar una celda.

Sub PropiedadRowsColumns()
Range(“A1”).Rows(3).Delete
End Sub

Ejercicio 13

Vamos a eliminar una fila.

Sub PropiedadRowsColumns()
Sheets(“Hoja1”).Rows(4).Delete
End Sub

Ejercicio 14

Vamos a eliminar una columna seleccionando un rango:

Sub PropiedadRowsColumns()
Range(“B3:D10”).Columns(2).Delete
End Sub

TIP cómo ir al último registro

Debemos saber cual es nuestro último dato para poner nuestros últimos registros, es decir pondremos nuestros datos en las últimas filas.

Podemos usar:
Sheets (“Hoja1”) es estático
ActiveSheet hoja abierta

Usaremos ActiveSheet

Sub PropiedadRowsColumns()
fila = ActiveSheet.Cells.(Rows.Count,“B” )End(xlUp).Row
Cells(fila + 1, “B” ).Value = “Miguel”
End Sub

Te recomendamos ver estos artículos: 

La propiedad EntireRow y la propiedad EntireColumn
La Propiedad Formula y la propiedad Address
La propiedad Color y la propiedad Font
La propiedad Count
Crear la siguiente Base de datos con botones; Registrar, Limpiar, Actualizar, eliminar y buscar registros. 
Ventana Inspección, inmediato, locales
Herramienta Depuración de una macro
Trabajando con comentarios
Usando el bucle FOR NEXT
Usando el bucle While