AllModules-Objekt (Access)
Die AllModules-Auflistung enthält ein AccessObject jedes Moduls im CurrentProject - oder CodeProject-Objekt .
Hinweise
Das CurrentProject - oder CodeProject-Objekt verfügt über eine AllModules-Auflistung , die AccessObject-Objekte enthält, die Instanzen aller Module-Objekte beschreiben, die von CurrentProject oder CodeProject angegeben werden. Beispielsweise können Sie die AllModules-Auflistung in Visual Basic aufzählen, um die Werte der Eigenschaften einzelner AccessObject-Objekte in der Auflistung festzulegen oder zurückzugeben.
Verweisen Sie auf ein einzelnes AccessObject-Objekt in der AllModules-Auflistung , indem Sie entweder anhand des Namens auf das Objekt verweisen oder auf seinen Index innerhalb der Auflistung verweisen. Wenn Sie auf ein bestimmtes Modul in der AllModules-Auflistung verweisen möchten, empfiehlt sich die Verwendung des Namens, da der Index sich ändern kann.
Die AllModules-Auflistung wird beginnend mit 0 indiziert. Wenn Sie auf ein Modul über seinen Index verweisen, ist AllModules(0) das erste Modul, AllModules(1) das zweite Modul usw.
Hinweis
Um alle geöffneten Module in der Datenbank aufzulisten, verwenden Sie die IsLoaded-Eigenschaft jedes AccessObject-Objekts in der AllModules-Auflistung . Sie können dann die Name-Eigenschaft jedes einzelnen AccessObject-Objekts verwenden, um den Namen eines Moduls zurückzugeben.
Es ist nicht möglich, der AllModules-Auflistung ein AccessObject-Objekt hinzuzufügen oder aus ihr zu löschen.
Beispiel
Im folgenden Beispiel wird der Namen jedes geöffneten AccessObject-Objekts in der AllModules-Auflistung ausgegeben.
Sub AllModules()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
' Search for open AccessObject objects in AllModules collection.
For Each obj In dbs.AllModules
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub
Eigenschaften
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.