Pasa Programación, apuntes y soluciones con Access
Página principal Mis apuntes de Access Mis utilidades Mis ejemplos Mis agradecimientos Enlaces a otras Webs

Arbolizar controles

¿Alguna vez has pensado que Access se está riendo de tí, cuando intentas usar el valor que muestra un control de un formulario o subformulario, y siempre recibes mensajes de error? Si aún no has leído el artículo Referenciar controles, o lo has leído pero no lo entiendes bien, tal vez este complemento te ayude. Dispone de una ventana que, al mostrarse, muestra los formularios e informes que tenemos abiertos. Tras seleccionar uno de estos objetos, se muestran en la lista de la derecha todos los controles que tiene ese objeto. Y al seleccionar uno de estos controles, en el cuadro de texto inferior aparece la ruta completa para poder acceder a ese control, ya sea desde código VBA, o en los diseñadores de formularios, informes o consultas.

También dispone de una ventana de opciones, donde se puede indicar si en el cuadro de texto, queremos que aparezca la ruta del control sin entrecorchetar los nombres de los objetos, o si queremos entrecorchetar sólo los nombres que sean necesarios para Access, o entrecorchetar todos los nombres, sean necesarios o no.

En el cuadro de texto, verás que aparece la palabra Form en vez de Formulario, o Forms en vez de Formularios. Esto se ha hecho así para evitar la internacionalización de Access. En los diseñadores de objetos, si tenemos una versión en español de Access, podemos escribir Formularios, y Access no se quejará. Pero si escribimos lo mismo en una versión inglesa, Access se quejará porque no entiende ese término. En cambio, en las dos versiones puede entender perfectamente la palabra Forms, ya que es como la usa internamente Access. Si en nuestra versión en español usamos la palabra Forms en un diseñador de objetos, Access la traduce automáticamente a Formularios, para que nosotr@s la entendamos.


Garantías

Este archivo se entrega "tal cual", sin garantías de ninguna clase.

Modo de uso:

  1. Descarga e instala el ejecutable.
  2. Abre Access junto con una base de datos cualquiera.
  3. Ve al menú Herramientas -> Complementos -> Administrador de complementos.
  4. En el diálogo que aparece, pincha sobre el botón Agregar nuevo...
  5. Busca el archivo mda que has instalado en el punto 1, y selecciónalo.
  6. Access instalará el archivo en la carpeta que tiene definida para sus complementos, y agregará una serie de elementos en el menú Herramientas -> Complementos.
  7. Selecciona los nuevos elementos creados por Access en el punto 6, para usar los formularios del complemento.

Usar el complemento como referencia

El complemento también puede ser usado como una librería, si se agrega a las referencias de la base de datos activa. Usando el complemento como librería, se pueden usar 3 métodos:

  • AbrirControlTodos: abre el formulario principal del complemento.
  • CambiarCorchetes: convierte el texto pasado en el primer argumento, agregando o quitando los corchetes según el valor del segundo argumento.
  • CrearArbol: crea el árbol del objeto pasado como argumento.
Private Sub Prueba()
    'Podemos abrir el formulario directamente
    Call psArbolControl.AbrirControlTodos()

    'O recoger el árbol de un control
    Dim sArbol As String
    sArbol = psArbolControl.CrearArbol(Screen.Activecontrol)
    Debug.Print sArbol

    'Y entrecorchetar el valor recibido
    'Los valores para el segundo argumento son:
    ' 0: Quitar los corchetes
    ' 1: Colocar corchetes sólo en las palabras no estándares
    ' 2: Colocar corchetes en todas las palabras
    Call psArbolControl.CambiarCorchetes(sArbol, 1)
    Debug.Print sArbol
End Sub

Licencia

Para poder usar el complemento en tus aplicaciones, debes completar la licencia "postaware":

Términos de licencia postalware

Y la dirección para completar la licencia postalware es la siguiente:

Francisco Javier Sanz Torres
C/ Magdalena, 4
31500 Tudela (Navarra)
España

Recuerda que el envío de dinero no es necesario para la licencia postalware, así que como yo no te lo pido, que tampoco te lo pidan otr@s.

Créditos

Revisiones

Fecha

Versión

Descripción

12/07/2008

1.0b

Creación del complemento.

Descargas

Descarga el complemento (versión Access 2000) - 1 Mb.

2008 Patxi Sanz
Libro de visitas
Hosted by www.Geocities.ws

1