MS-Accessのテーブル複数個一括して削除する方法は無いでしょうか?

(全部削除するわけではありません)
マクロを組む必要がある場合はそのマクロの記述はお願いします
(削除したいテーブルは「インポートエラー」のテーブルです

MS-AccessのバージョンはACCESS97です

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:
  • 終了:--
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

回答3件)

id:taknt No.1

回答回数13539ベストアンサー獲得回数1198

ポイント5pt

私が やってる方法は マクロで ひとつずつ 削除したいテーブルを記述するやり方です。

最初は ちょっと大変ですが、一回作っておくと あとは 楽です。

ちなみに マクロの画面で

SQLの実行

Delete from テーブル名 とします。

id:taknt No.2

回答回数13539ベストアンサー獲得回数1198

ポイント5pt

あ、テーブル自体削除するならば

drop table テーブル名

ですね。

id:tsurinews

テーブル名称にワイルドカードは使えますか?

例えば「 *インポート* 」と記述して複数削除

2004/10/01 18:01:39
id:cx20 No.3

回答回数607ベストアンサー獲得回数108

ポイント100pt

下記の VBA で消せると思います。

(Access 97 と Access 2002 で動作確認をしました。)

ただ、一応、念のため、削除する前にバックアップはトって置くようにしてください(^^A

Public Function TableDelete() As Boolean

Dim dbs

Dim i

Set dbs = CurrentDb

For i = dbs.TableDefs.Count - 1 To 0 Step -1

If InStr(dbs.TableDefs(i).Name, ”インポート”) > 0 Then

dbs.TableDefs.Delete dbs.TableDefs(i).Name

End If

Next

dbs.TableDefs.Refresh

Set dbs = Nothing

End Function

http://www.accessclub.jp/bbs2/0029/beginter09781.html

TableDefs.Delete について質問です --Access Club Access 初・中級者 FORUM--

id:tsurinews

出来ました〜(^-^)/

有難う御座いますm(._.)m

すばらしい(^^)// 

2004/10/01 18:44:52

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません