Home > 即効テクニック > AccessVBA > フォーム・レポート > 新規作成したレポートに名前を付けて保存する

即効テクニック

フォーム・レポート

新規作成したレポートに名前を付けて保存する

(Access 2000/2002/2003)
● 概要 ●
構文  expression.Save(ObjectType, ObjectName)


設定項目        内容
expression	DoCmdオブジェクト[省略不可]
ObjectType	保存するオブジェクトの種類をAcObjectTypeクラスの定数で指定	
		[省略可能]
ObjectName	保存名を文字列式で指定[省略可能]

Reportオブジェクトは、引数に指定した新しい名前で保存することができます。
引数を省略すると、acDefaultが指定されたこととなり、アクティブオブジェクトが保存されるので、レポートを新規作成した場合には、作成したReportオブジェクトを引数で指定した名前で保存することができます。
ただし、引数には、レポート名として有効な文字列式を指定する必要があり、また既存のレポートやテーブルなどと同じ名前を付けることはできません。


● サンプル ●
Sub SaveReportSample()
    Dim myNewReport As Report
     '最小化したレポートを作成
    Set myNewReport = CreateReport()
     '「新規レポート」という名前で保存
    DoCmd.Save , "新規レポート"
End Sub