英語で読む

次の方法で共有


AllMacros オブジェクト (Access)

AllMacros コレクションには、 CurrentProject または CodeProject オブジェクトの各マクロに対する AccessObject が含まれます。

注釈

CurrentProject または CodeProject オブジェクトには、 CurrentProject または CodeProject で指定されたすべてのマクロのインスタンスを設定する AccessObject オブジェクトを含む AllMacros コレクションがあります。 たとえば、Visual Basic で、 AllMacros コレクションを列挙して、コレクションの各 AccessObject オブジェクトのプロパティの値を設定または取得することができます。

AllMacros コレクション内の個々の AccessObject オブジェクトを参照するには、オブジェクトを名前で参照するか、コレクション内のインデックスを参照します。 AllMacros コレクションの特定のオブジェクトを参照する場合、マクロのコレクションのインデックスは変わる可能性があるので、マクロの名前で参照することをお勧めします。

AllMacros コレクションには、0 から始まるインデックスが付けられます。 インデックスでマクロを参照する場合、最初のマクロは AllMacros(0)、2 番目のマクロは AllMacros(1)、のように指定します。

注意

データベース内のすべての開いているマクロを一覧表示するには、AllMacros コレクション内の各 AccessObject オブジェクトの IsLoaded プロパティを使用します。 その後、個々の AccessObject オブジェクトの Name プロパティを使用して、マクロの名前を返すことができます。

AllMacros コレクションから AccessObject オブジェクトを追加または削除することはできません。

次の使用例では、AllMacros コレクションで開いている AccessObject オブジェクトの名前を出力します。

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

プロパティ

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。