Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9455 / 9994

←次へ　｜　前へ→


	【3678】Re:ﾃﾞｰﾀベースオブジェクトの削除方法

Gin_II - 04/10/12(火) 17:56 -


	引用なし

	パスワード

>For Each ～ Next を用いたフォーム、レポート、マクロ、モジュールの
>削除方法をご教授ください。宜しくお願いします。

マクロの取得方法はよく分かりません。
ので、システムテーブルを参照する方法を。

SELECT Swith(MsysObjects.Type=1,"Table",
　　　　　　 MsysObjects.Type=4,"Link_Table",
　　　　　　 MsysObjects.Type=5,"Query",
　　　　　　 MsysObjects.Type=6,"Link_Table",
　　　　　　 MsysObjects.Type=-32761,"Module",
　　　　　　 MsysObjects.Type=-32764,"Report",
　　　　　　 MsysObjects.Type=-32766,"Macro",
　　　　　　 MsysObjects.Type=-32768,"Form"),
　　　 MsysObjects.Name
FROM MsysObjects
WHERE Left$([Name],1)<>"~"
ORDER BY MsysObjects.Type, MsysObjects.Name;

上記を、クエリのSQLビューで貼り付けてみてください。

1,920 hits

▼

【3668】ﾃﾞｰﾀベースオブジェクトの削除方法 山田 04/10/10(日) 0:59