Access VBA質問箱 IV

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

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


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

8989 / 9994

←次へ　｜　前へ→


	【4158】Re:オブジェクト一覧

Gin_II - 05/1/14(金) 16:37 -


	引用なし

	パスワード

>作成されている全てのテーブルやクエリー、レポート、フォーム等の名前です。
>
>T_在庫　　とか　R_月次レポート　とかです。
>
>どんなものが入っているかVBAで調べる処理をしたいのです。

VBAではないですが。。

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

クエリのSQLビューで、上記をコピーしてみてくださ。

526 hits

▼

【4143】テーブルの有無を調べる方法？ 山田 05/1/14(金) 10:55