Name: VBA Access 2016 Programar en Access
Rating: 2.5 (2 reviews)

Noción de objeto

VBA es un lenguaje que permite hacer programación orientada a objetos (POO): un objeto representa una idea, concepto o entidad del mundo real, como un avión, un individuo e incluso una película. Tiene una estructura interna y un comportamiento, y se puede comunicar con sus homólogos. Los elementos que permiten describir un objeto forman lo que se llama una clase. Cada objeto que proviene de una clase es una instancia de clase. Las clases tienen propiedades, métodos y eventos.

1. Propiedades

El objeto es una entidad que podemos distinguir gracias a sus propiedades (su color o dimensiones, por ejemplo). Si tomamos como ejemplo un libro, este se caracteriza por sus propiedades: número de páginas, título, número de capítulos, editor, contenido, etc. Cada una de sus propiedades se puede especificar en cada libro, pero todos los libros tienen fundamentalmente las mismas propiedades. Algunas propiedades de los objetos se pueden modificar (velocidad de un coche, por ejemplo) y otras no (una marca de coche).

En programación con VBA, la sintaxis general de acceso a las propiedades de un objeto es la siguiente:


MiObjeto.SuPropiedad

Aquí se accede a la propiedad SuPropiedad del objeto MiObjeto. La combinación MiObjeto.SuPropiedad tendrá el mismo comportamiento que una variable clásica, que puede tomar un valor o devolver un valor con el uso del operador...

Modelo de objeto de Access

El objetivo de algunas de las secciones siguientes es mostrar el modelo jerárquico utilizado dentro de la aplicación Access, en forma de colecciones de objetos, que se van a explicar a continuación.

Colecciones en Access

A continuación se muestran las principales colecciones que podemos manipular con VBA en Access.

Colección	Contiene una colección de	Descripción
COMAddins	COMAddin	Colección de los complementos COM
CommandBars	CommandBar	Colección de las barras de comando
Forms	Form	Colección de los formularios abiertos. Ver también CurrentProject.AllForms
Modules	Module	Colección de los módulos
Printers	Printer	Colección de las impresoras disponibles
References	Reference	Colección de las referencias a librerías. Ver Herramientas - Referencias
Reports	Report	Colección de estados. Ver también CurrentProject.AllReports
TempVars	TempVar	Colección de las variables temporales
WebServices	WebService	Colección de las conexiones a servicios web

Objetos de Access

A continuación se muestran los principales objetos que es posible manipular en el modelo Access.

Objeto	Descripción
Application	Representa la aplicación Microsoft Access activa.
AutoCorrect	Representa las opciones de corrección automática de Access.
DBEngine	Representa el motor de base de datos Microsoft Jet. Este objeto permite controlar el resto de los objetos de acceso a los datos.
DoCmd	Permite convertir en VBA las acciones de Macros.
FileDialog	Permite acceder a las funcionalidades de los cuadros de diálogo (Abrir o Guardar, por ejemplo).
LanguageSettings	Permite acceder a los argumentos lingüísticos de la aplicación.
Screen	Permite acceder a la ventana activa (formulario, estado o control).
VBE	Permite acceder al editor Visual Basic Editor.
CurrentProject	Permite acceder a diferentes objetos de Access específicos.
CurrentData	Permite acceder a varios objetos de Access de acceso a los datos.

1. El objeto Application

El objeto Application corresponde a la aplicación Microsoft Access activa.

a. Propiedades

Propiedad	Descripción
AutomationSecurity	Devuelve o define el modo de seguridad utilizado por Access durante la apertura del archivo, por programación. Este valor es una constante msoAutomationSecurity, cuya lista de valores figura en el anexo de este libro.
BrokenReference	Devuelve un booleano que indica si la aplicación tiene una o varias referencias rotas.
Build	Devuelve un valor numérico que presenta el número de copia de Microsoft Access 2016 actualmente instalada.
CodeContextObject	Devuelve un objeto que contiene una macro o el código de VB actual en ejecución.
CurrentObjectName	Devuelve el nombre del objeto activo (formulario, estado, tabla, consulta, macro o módulo).
CurrentObjectType	Devuelve un valor numérico según el tipo del objeto activo. La lista de las constantes acObjectType aparece en el anexo de este libro.
FeatureInstall	Devuelve o define el modo de administración de las llamadas a métodos o las propiedades que necesitan funcionalidades no instaladas en Microsoft Access.
IsCompiled	Devuelve un booleano que indica si el proyecto VB de la aplicación está compilado.
MenuBar	Devuelve o define la barra de menús que se utilizará por la base de datos.
Name	Devuelve el nombre de la base de datos de Microsoft Access.
Parent	Devuelve...

Manipular los objetos en VBA

1. Instrucción Set

Al contrario que la asignación de un valor a una variable de tipo sencillo (numérico, booleano, fecha, etc.), la asignación de un valor a una variable cuyo tipo es un objeto se realiza con la palabra clave Set.

La sintaxis general es la siguiente:


Set miObjeto = [New] InstrucciónGeneraElObjeto

La palabra clave New permite crear una nueva instancia de un objeto. Si el objeto ya existe, no es necesario utilizar esta palabra clave. InstrucciónGeneraElObjeto puede corresponder al nombre de un objeto o a una variable de objeto del mismo tipo.

Por ejemplo aquí, si se desea asignar a la variable tbl la tabla T_Formaciones, el código sería el siguiente:


Dim tbl As TableDef  
Set tbl = CurrentDb.TableDefs("T_Formaciones")

Reinstanciación de la variable objeto

Es posible instanciar de nuevo una variable objeto, gracias a la siguiente instrucción:


Set MiObjeto = Nothing

2. Instrucción With/End With

A la hora de modificar las diferentes propiedades de un objeto, puede ser largo y pesado para el programador repetir la ruta de acceso a este objeto, para cada propiedad que se desea modificar.

Por ejemplo, con las líneas de operación de un formulario:


'El formulario Formaciones inicialmente está abierto  
Forms("Formaciones").Caption = "Formaciones de la " & Fecha  
Forms("Formacion").Controls("DT_Formacion").Value=Fecha  ...

Las clases de objetos

Una clase es un modelo que utilizará el programa para crear nuevos objetos. Los objetos tienen propiedades similares a su modelo, podrán realizar las mismas acciones que su modelo y podrán actuar ante los mismos eventos que los de su modelo.

En función de las necesidades, cada objeto podrá tener sus características propias (título de un libro, número de páginas, precio, etc.) y un comportamiento específico. Cualquier objeto de Access viene de una clase.

1. Los módulos de clases

Para manipular los objetos que el desarrollador creará, se podrán utilizar los módulos de clases.

Los módulos de clases se definen de la siguiente manera:

Los módulos de clases tienen el nombre del objeto que definen;
Tienen procedimientos y funciones públicos Public Sub y Public Function, que definen los métodos propios del objeto;
Tienen las funciones Property Get, que sirven para leer los valores de sus propiedades, así como los procedimientos Property Set/Property Let para definir los valores de estas propiedades.

Una vez que se definen estos elementos en un módulo de clase, podemos crear un nuevo objeto correspondiente a esta definición. La sintaxis general para conseguirlo es la siguiente:


Dim NombreObjeto As New NombreDeClasePersonalizada

La llamada a los módulos de clase sigue estando restringida solo a los desarrolladores más experimentados.

En los siguientes ejemplos, se define una clase que representa un libro.

Empezamos con una clase llamada cLibro. En el menú Insertar, se selecciona Módulo de clase.

En la zona Propiedades, se modifica el nombre de la clase como cLibro.

2. Las propiedades

Las propiedades se corresponden con las instrucciones que permiten leer y definir las características de un objeto.

La creación de una propiedad se desarrolla en dos etapas: se define una variable privada dentro de la clase y después se definen, los bloques de propiedades Property Get y Property Let. La lectura de la propiedad se hace por medio de Property Get, y su escritura con Property Let.

En la interfaz de VBE, se activa el módulo de clase seleccionando el menú Insertar - Procedimiento: