Unidad 1. MICROSOFT EXCEL ()

Editar un módulo

En la ventana de proyectos, ubicamos la carpeta Módulo; luego de abrir esta carpeta veremos al interior uno o más módulos; al hacer doble clic en uno de ellos, tendremos al lado derecho, el contenido del módulo seleccionado.

También puede ver el código seleccionando el módulo y haciendo clic en [Ver código], como se indica en la figura 1.45.

Crear un módulo o función

Estando en la ventana del Editor del VBA, use [Insertar] - [Módulo]

A continuación, en la ventana de proyectos aparecerá una nueva carpeta Módulo. Al abrir esta carpeta aparecerá Módulo1. Si hacemos doble clic en Módulo1, en el lado derecho tendremos el contenido de este módulo el cual estará formado por uno o más procedimientos. Si la carpeta módulo ya existía entonces sólo se agregará un nuevo módulo dentro de dicha carpeta y aparecerá inscrito el primer módulo con el nombre Módulo1.

Un procedimiento se identifica con las palabras Sub   y End Sub

Sintaxis de un procedimiento:

[Private / Public  [ Static] Sub NombreDelProcedimiento[(Argumentos)]

-  Instrucciones

-  

End Sub

Todo aquellos que está entre corchetes se considera opcional. Por ello podemos apreciar que todo procedimiento tendrá como mínima sintaxis:

Sub Nombre()

End Sub

Se usará Private si el procedimiento es accesible sólo para los procedimientos contenidos en dicho módulo.

Se usará Public si se desea que el procedimiento sea accesible por todos los procedimientos de todos los módulos.

Se usará Static si las variables locales se conservan en diferentes llamadas al procedimiento.

Sentencias de uso frecuente

Haremos una muy breve enumeración de algunas sentencias del VBA que nos permitirán el uso de los objetos contenidos en el Excel.

Para crear un módulo debe digitar: Sub NombreModulo y presionar [Enter]. Automáticamente obtendrá:

Sub NombreModulo()

End Sub

Al interior de estas dos sentencias deberá escribir todo lo que el módulo debe hacer.  Si desea crear una función, deberá digitar: Function NombreFuncion [(…..)] y presionar [Enter], luego del cual obtendrá

Function Nombre ([….])

Los corchetes indican que su contenido es opcional

...

Nombre = Expresión

End Function

Si la función requiere de argumentos, debe ingresarlos dentro de los paréntesis.

La siguiente tabla muestra una lista de algunas instrucciones de fácil comprensión y las que nos permitirá modificar algunas macros de forma que éstas sean interactivas y se conviertan en macros de mayor potencia.

Seleccionar Instrucción Ejemplo
Una celda Range(“Celda”).Select Range(“A4”).Select
Un rango Range(“Rango”).Select

Range(Variable).Select

Range(“B3:G8”).Select

Range(CeldaIn).Select

Range(“A:B”).Select Selecciona toda la columna A y B
Range(“1.5”).Select Selecciona las filas 1 a 5
Cells(Nfila,NColumna).Select Cells(2,5).Select            Celda E2
Una hoja Sheets(“NombreHoja”).Select Sheets(“Hoja1”):Select
Sheets(“Nombre”).Activate Sheets(“Hoja2”).Activate
Sheets(Indice).Activate Sheets(2).Activate
Un libro WorkBooks(“Nombre”).Activate WorkBooks(“Ventas”).Activate
Añadir
Nueva hoja Sheets.Add Añade nueva hoja a la izquierda de la activa
Sheets.Add Before:=Sheets(1) Añade antes de la hoja 1

Sheets.Add

ActiveSheet.Name = "Tabla01

Añade una nueva hoja y la hace activa

Cambia de nombre a la hoja activa
Nuevo libro WorkBooks.Add Abre un nuevo libro
Propiedades de una celda o rango de celdas
Fuente Rango.Font.Bold=True/False Range(“B5:D8”).Font.Bold = True
Rango.Font.Color=RGB(A,B,C) Range(“B5”).Font.Color = RGB(120,0,120)
Rango(.Font.Size=n Range(“B5”).Font.Size = 18
Rango.Font.Italic=True/False Range(“B3:B10”).Font.Italic=True
Rango.Font.Name=Estilo Range(“A1:E1”).Font.Name = “Times New Roman”
Sheets(2).Name = “Ventas” Cambia el nombre de la Hoja2 por Ventas
Range(“A5”).Name = “Tasa” Cambia el nombre de la celda A5 por Tasa
Abrir libro Workbooks.Open "g:\Libros\AplicEstExcel\j.xls"
Graba libro WorkBooks(Nombre).Save Graba con el nombre que tenga
WorkBooks(Nombre).SaveAs Graba con un nuevo nombre
Cierra libro WorkBooks(Nombre).Close Cierra el libro
ActiveWorkBook.Close Cierra el libro activo

 

Pág. 1.35

Atrás  Inicio  Adelante





Página inicial  Cursos Informática Gratuitos

Síguenos en:   Facebook       Sobre aulaClic            Política de Cookies