-PR-
締切済み

Access VBAでテーブルの確認

  • 暇なときにでも
  • 質問No.3205
  • 閲覧数2574
  • ありがとう数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で解決しましたか?
AIエージェント「あい」

こんにちは。AIエージェントの「あい」です。
あなたの悩みに、OKWAVE 3,500万件のQ&Aを分析して最適な回答をご提案します。

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

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

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

特集


専門家があなたの悩みに回答!

ピックアップ

ページ先頭へ