Paz y Bien Srtas.
Estudiantes
A continuación
tenemos una pequeña actividad la cuál pretender potencializar la actividad
anterior.
El objetivo de esta
actividad es realizar un registro de datos, teniendo como base fundamental la
programación estricta de la secuencia de comandos.
Por ejemplo si yo
formulo bien mis variables antes de. Podemos proceder con la secuencia del
código de programación:
Objeto WorkSheet. Propiedades y Métodos. Ejemplos.
El objeto WorkSheet
representa un libro en Excel. Como objeto, es un elemento de la clase o
conjunto WorkSheets. Como clase o
conjunto, WorkSheets contiene todos los objetos WorkSheet abiertos en un
momento determinado en Microsoft Excel.
Cada objeto WorkSheet
representa una hoja de cálculo.
Propiedades del objeto WorkSheet
Describiremos dos
propiedades del objeto WorkSheet
a) Propiedad WorkSheets
Esta propiedad
devuelve el resultado de una acción realizada sobre una determinada hoja de
cálculo identificada por su nombre o por un índice en el argumento de esta
propiedad.
Sintaxis:
WorkSheets(x).Método
Donde
x puede ser el número de
hoja o el nombre de la misma.
Método es el método que se usará sobre la
hoja x
b) Propiedad ActiveSheet
Esta propiedad
permite hacer referencia a la hoja activa y extraer o modificar alguna de sus
propiedades mediante el uso de algunos métodos.
Sintaxis:
ActiveSheet.Método
En los siguientes
ejemplos haremos uso de estas dos propiedades sea en forma individual o en
forma complementaria
Ejemplo 01
WorkSheets(1).Activate
Permite activar la
hoja 1 del libro activo
Ejemplo 02
El siguiente ejemplo
pide la ruta y nombre de libro a abrirse y activa la hoja 3 de dicho libro.
Sub Activar()
Libro =
Trim(InputBox("Ruta y nombre del archivo"))
Libro = Libro +
".xls"
Workbooks.Open
Filename:=Libro
Book =
ActiveWorkbook.Name
Workbooks(Book).Worksheets("Hoja3").Activate
End Sub
Ejemplo 03
El siguiente ejemplo
permite obtener el nombre de la hoja activa.
Sub Nombre()
Worksheets(1).Activate
NombreHoja =
Worksheets(1).Name
MsgBox NombreHoja
End Sub
Recuerda que la
práctica incrementa mucho más tus conocimientos.
Estudiante
Fatimense, tú eres el orgullo de tus Padres.