Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
Logo Excel Avanzado

Referencia a rangos en VBA

| Sin comentarios

Por medio del uso Range podemos emplear diversos conjuntos de datos, en este artículo veremos como hacer referencia a los rangos.

Por medio de Range podemos identificar los siguientes rangos:

* Un conjunto de celdas

* Una celda especifica

* Una fila o columna entera

* Celdas en otras hojas de trabajo.

 

Formas de Seleccionar celdas con Range

Una celda especifica:

Range("A1").select

 

Un conjunto de celdas:

Range("B1:C4").select

Range(Cells(1, 1), Cells(5, 3)).select 

 

Conjunto de celdas no contiguas:

Range("B1,B5,D6").Select

 

Celdas no contiguas mas un conjunto especifico:

Range("G1,H2,A1:B3").Select

 

Ejemplos de referencia a rangos en VBA

A continuación vamos a revisar algunos ejemplos sobre como hacer referencia a rangos usando Range

Sub ejemplo01()

' Escribir una misma palabra en todo el rango

Worksheets("Hoja2").Range("B15:E33") = "Hola"

' Ahora escriberemos otro texto solo en 2 celdas

Worksheets("Hoja2").Range("D5,G7") = "Excel"

Worksheets("Hoja2").Range("J1,H2,B8") = "Avanzado"

Range("A1").Offset(2, 2) = "Referencia"

End Sub

 

Como se puede ver el codigo Offset en VBA se basa en la celda, para a partir de esa referencia emplear otra celda, para conocer mas detalles del offset se puede revisar: Utilidad del Offset

En el siguiente ejemplo observaremos como por medio de una variable (en este caso la variable se llama "Mirango") se puede hacer referencia a un rango de celdas, y realizar diversas operaciones sobre el conjunto de celdas.

 

Sub ejemplo02()

Dim Mirango As Range

Set Mirango = Worksheets("Hoja1").Range("B55:E59")

Mirango.Formula = "Area"

Mirango.Font.Bold = True

End Sub

Descargar ejemplos mostrados: Referencia a rangos en VBA

Deja un comentario

Los campos requeridos estan marcados con *.