質問: access vbaでテーブルの確認 access 200のvbaで、テーブルが存在しているかどうかのコードをつくれません。存在しなければsqlでcreateさせるなどの処理をしたいのです。コードを教えてください。
回答: access2000及び下位互換な関数です。 public function existtabledef(tablename as string) as boolean 'currentdbに指定したtabledefオブジェクトが存在するかを調べる(true=存在する) dim dummy as string on error resume next dummy = currentdb.tabledefs(tablename).name if dummy <> "" then existtabledef = true err.clear else existtabledef = false err.clear end if end function access2000 onlyなら、accessobjectオブジェクトを使えばいいでしょう。