-PR-
締切済み

Access VBAでテーブルの確認

  • 暇なときにでも
  • 質問No.3205
  • 閲覧数2587
  • ありがとう数7
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 38% (63/163)

Access 200のVBAで、テーブルが存在しているかどうかのコードをつくれません。存在しなければSQLでCREATEさせるなどの処理をしたいのです。コードを教えてください。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

回答 (全1件)

  • 回答No.1
レベル13

ベストアンサー率 46% (643/1383)

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オブジェクトを使えばいいでしょう。


このQ&Aで解決しましたか?
関連するQ&A
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-

特集


開業・独立という夢を持つ人へ向けた情報満載!

ピックアップ

ページ先頭へ