質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.48%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

Q&A

解決済

1回答

2140閲覧

"内の変数表記(実行時エラー2471)

ukana

総合スコア7

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Access

Accessはマイクロソフトによるリレーショナルデータベース管理システムです。オブジェクト指向のアプリケーション作成に対応しており、テーブルや編集をはじめ、クエリ生成、入力フォーム作成、レポート作成など一通りの機能を備えています。

0グッド

0クリップ

投稿2022/06/16 03:36

Microsoft access 365 ADOでの
データベース構築をしています。

テーブルの存在を確認し、あれば削除する
if文の動作がうまくいきません。

vba

1If DCount("*", "MSysObjects", "[Name]='テーブル1'") > 0 Then

こちらでは動作するのですが
変数titleに以下のように置き換えると
実行時エラー2471
クエリ パラメーターとして指定した式で
エラー’テーブル1'が発生しました
というエラーになります。

vba

1If DCount("*", "MSysObjects", "[Name] =" & title) > 0 Then

ローカルの表示をみると
title変数の項目は”テーブル1”となっています。

"の付け方の認識が違うのかとは思い調べたのですが
自己解決できず教えて頂きたいです。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

ベストアンサー

現状のコードの場合、「[Name] = テーブル1」となってしまっているからではないでしょうか。
(「'」がない)

「'」をテーブル名に付与してあげると正しく実行できませんか?

vba

1If DCount("*", "MSysObjects", "[Name] ='" & title & "'") > 0 Then

投稿2022/06/16 04:05

Matsumon0104

総合スコア1005

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

ukana

2022/06/16 05:04

ありがとうございました! 正常に動作しました。 'や"の表記について再度勉強します。 大変助かりました。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.48%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問