Como puedo comprobar si existe un forms concreto?


RESPONDE BUHO
=============

En Access puedes recorrer las colecciones de objetos de una MDB, como pueden
ser Formularios, Reportes etc.

Sacado directamente de la ayuda de Access:
Sub AllForms()
    Dim obj As AccessObject, dbs As Object
    Set dbs = Application.CurrentProject
    ' Vamos a mostrar formularios Cargados
    For Each obj In dbs.AllForms
        If obj.IsLoaded = True Then
         Debug.Print obj.Name
        End If
    Next obj
End Sub


Siguiendo en esta linea, para saber si en una MDB concreta existe o
no existe un formulario, create una funcion, mas o menos como esta:

Function ExisteForm(NombreForm As String) As Boolean
 Dim obj As AccessObject, dbs As Object
    Set dbs = Application.CurrentProject
    ' Recorremos la coleccion de formularios de esta MDB
   For Each obj In dbs.AllForms
     If obj.Name = NombreForm Then
       ExisteForm=True
       exit for
     End If
    Next obj
End Function

    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)