次の方法で共有


AllReports オブジェクト (Access)

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

注釈

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

AllReports コレクション内の個々の AccessObject オブジェクトを参照するには、項目を名前で参照するか、コレクション内のインデックスを参照します。 AllReports コレクション内の特定のレポートを参照する場合は、インデックスが変更される可能性があるため、名前でレポートを参照することをお勧めします。

AllReports コレクションには、0 から始まるインデックスが付けられます。 レポートをインデックスで参照する場合、最初のレポートは AllReports(0)、2 番目のレポートは AllReports(1)、以下同様になります。

注:

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

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

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

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

プロパティ

関連項目

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

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