Unidad 5. Programación usando objetos del Excel (XI)

Conjunto Range. Propiedades y Métodos. Ejemplos.

El conjunto Range representa una celda, un rango de celdas, una fila, columna sobre los cuales se puede actuar modificando sus propiedades mediante la acción de una gran variedad de métodos para devolver un objeto range.

Propiedad Range

Sintaxis

Range(Cadena).Método

Devuelve un objeto range que representa una celda o un rango de celdas.

El argumento Cadena representa a una celda o un rango de celdas. Por ejemplo A2, B5:B12, B2:M12.

Ejemplos simples:

Range("A1").Select                       ' Activa o selecciona la celda A1

Range("A1").Activate                    'Activa o selecciona la celda A1

Range("A1").Value                        ' Devuelve el valor o contenido de la celda A1

Range("A1").Value = Expresión   ' Se asigna a la celda A1 el valor de Expresión.

Range("A1").Name = "Tasa"        ' Permite dar el nombre de Tasa a la celda A1

MsgBox Range("A1").Value         ' Permite visualizar el contenido de la celda A1

MsgBox Range("B3").Address()   ' Visualiza la celda B3

MsgBox Range("B3").AddressLocal()      ' Como en el caso anterior

Range("B3").AddComment "Esta es una celda de datos"

                                                      ' Inserta en B3 el comentario que se indica

Range("B3").Clear                        ' Borra contenido y formato de la celda B3

Range("B3").ClearContents          ' Borra sólo el contenido de la celda B3

Range("B3").ClearComments      ' Elimina el comentario insertado en B3

Range("B3").ClearFormats           ' Borra solo el formato de B3

MsgBox Range("E3").Column      ' Emite el número de columna; en este caso 5.

MsgBox Range("J3:M21").Column          ' En este caso devuelve 10

Rango = "D2:F8"

MsgBox Range(Rango).Column              ' Devuelve 4

Veamos el siguiente grupo:

Rango = "D2:H15"

Range(Rango).Columns(3).Value = "M"

Range(Rango).Rows(3).Value = "MMMMMMM"

En este caso la variable Rango se define como el rango D2:H15; la siguiente sentencia asigna "M" a cada celda de la tercera columna de este rango; es decir a F3:F5

La tercera asigna el texto "MMMMMMM" a cada celda de la tercera fila; es decir a D4:H4

Las siguientes dos sentencias permiten copiar el contenido del rango B1:B6 de la Hoja2 hacia la Hoja3, a partir de la celda E5

MsgBox Range("B3").ColumnWidth        ' Devuelve el ancho de la columna B

Sheets("Hoja2").Range("B1:B6").Copy Destination:=Sheets("Hoja3").Range("E5")

La siguiente sentencia selecciona tres hojas del mismo libro (libro activo)

Worksheets(Array("Sheet1", "Sheet2", "Sheet4")).Select

En los siguientes ejemplos haremos uso de diversos métodos en el cual lo explicaremos explícitamente instrucción por instrucción.

 Cursos Informática Gratuitos