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

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

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

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2004/10/01 17:35:17
  • 終了:--

回答(3件)

id:taknt No.1

きゃづみぃ回答回数13539ベストアンサー獲得回数11982004/10/01 17:38:46

ポイント5pt

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

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

ちなみに マクロの画面で

SQLの実行

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

id:taknt No.2

きゃづみぃ回答回数13539ベストアンサー獲得回数11982004/10/01 17:57:11

ポイント5pt

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

drop table テーブル名

ですね。

id:tsurinews

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

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

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

cx20回答回数607ベストアンサー獲得回数1082004/10/01 18:29:31

ポイント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

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

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

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

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

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません