●概要●
構文 expression.DeleteObject(ObjectType, ObjectName)
設定項目 | 内容 |
expression | DoCmdオブジェクト[省略不可] |
ObjectType | 削除するオブジェクトの種類をAcObjectTypeクラスの定数で指定
[省略可能] |
ObjectName | 削除するオブジェクトの名前を文字列式で指定[省略可能] |
指定したオブジェクトを削除します。コード実行中に一時的に作成したオブジェクトを削除する場合などに使用します。引数
、を省略すると、引数にacDefaultを指定したこととなり、データベースウィンドウで現在選択されているオブジェクトが削除されます。引数に指定できる定数は次のとおりです。
・引数に指定する定数(AcObjectTypeクラス)
定数 | 説明 |
acDataAccessPage | データアクセスページ |
acDefault | 現在選択されているオブジェクトの種類(既定値) |
acDiagram | ダイアグラム |
acForm | フォーム |
acFunction | ファンクション |
acMacro | マクロ |
acModule | モジュール |
acQuery | クエリ |
acReport | レポート |
acServerView | サーバービュー |
acStoredProcedure | ストアドプロシージャ |
acTable | テーブル |
●サンプル●
'CopyObjectSampleを実行してから実行
Sub DeleteObjectSample()
'エラーの場合、myErr: へ
On Error GoTo myErr
'[コピー書籍テーブル]を削除
DoCmd.DeleteObject acTable, "コピー書籍テーブル"
MsgBox "[コピー書籍テーブル]を削除しました"
'プロシージャを終了
Exit Sub
myErr:
MsgBox "サンプルプロシージャDeleteObjectSampleの実行前に、" _
& "CopyObjectSampleを実行し、テーブル[コピー書籍テーブル]を
作成して下さい。"
End Sub