The CurrentData or CodeData object has an AllStoredProcedures collection containing AccessObject objects that describe instances of all stored procedures specified by CurrentData or CodeData. For example, you can enumerate the AllStoredProcedures collection in Visual Basic to set or return the values of properties of individual AccessObject objects in the collection.
You can refer to an individual AccessObject object in the AllStoredProcedures collection either by referring to the object by name, or by referring to its index within the collection. If you want to refer to a specific object in the AllStoredProcedures collection, it's better to refer to the stored procedures by name because a stored procedure's collection index may change.
The AllStoredProcedures collection is indexed beginning with zero. If you refer to a stored procedure by its index, the first stored procedure is AllStoredProcedures(0), the second stored procedure is AllStoredProcedures(1), and so on.
The following example prints the name of each open AccessObject object in the AllProcedures collection.
Sub AllStoredProcedures() Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentData ' Search for open AccessObject objects in ' AllStoredProcedures collection. For Each obj In dbs.AllStoredProcedures If obj.IsLoaded = True Then ' Print name of obj. Debug.Print obj.Name End If Next obj End Sub