Objet AllDatabaseDiagrams (Access)

La collection AllDatabaseDiagrams contient un objet AccessObject pour chaque schéma de base de données dans l'objet CurrentData ou CodeData.

Remarques

L'objet CurrentData ou CodeData possède une collection AllDatabaseDiagrams contenant des objets AccessObject qui décrivent des instances de tous les schémas de base de données spécifiées par l'objet CurrentData ou CodeData. Par exemple, vous pouvez énumérer la collection AllDatabaseDiagrams dans Visual Basic pour définir ou renvoyer les valeurs des propriétés des objets AccessObject individuels dans la collection.

Faites référence à un objet AccessObject individuel dans la collection AllDatabaseDiagrams en faisant référence à l’objet par son nom ou en faisant référence à son index dans la collection. Si vous souhaitez faire référence à un objet spécifique de la collection AllDatabaseDiagrams, il est préférable d'utiliser le schéma de base de données par son nom car l'index de collection d'un schéma de base de données peut changer.

La collection AllDatabaseDiagrams est indexée à partir de zéro. Si vous faites référence à un diagramme de base de données par son index, le premier schéma de base de données est AllDatabaseDiagrams(0), le second diagramme de base de données est AllDatabaseDiagrams (1) et ainsi de suite.

Remarque

Vous ne pouvez pas ajouter ou supprimer un objet AccessObject dans la collection AllDatabaseDiagrams.

Exemple

L'exemple suivant imprime le nom de chaque objet AccessObject ouvert dans la collection AllDatabaseDiagrams.

Sub AllDatabaseDiagrams() 
    Dim obj As AccessObject, dbs As Object 
    Set dbs = Application.CurrentData 
    ' Search for open AccessObject objects in 
    ' AllDatabaseDiagrams collection. 
    For Each obj In dbs.AllDatabaseDiagrams 
        If obj.IsLoaded = True Then 
            ' Print name of obj. 
            Debug.Print obj.Name 
        End If 
    Next obj 
End Sub 

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.