![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
全てのフォームを一気に削除したく、ググってみたら
http://oshiete.goo.ne.jp/qa/8093271.htmlが見つかって
Sub test()
Dim i As Integer
For i = CurrentProject.AllForms.Count - 1 To 0 Step -1
DoCmd.DeleteObject acForm, CurrentProject.AllForms(i).Name
Next i
End Sub
のコードを実行してみたのですが、途中で
実行時エラー2467
指定した式で、閉じているかまたは存在しないオブジェクトを参照しています。
という、エラーになってしまいます。
ググってみたらこのエラーはフォームが存在しない時に発生するエラーのようですが、
全てのフォームをループしているのに存在しないフォームを参照する事なんてあるのでしょうか?
フォームはすべて閉じている状態で実行しました。
あと、発見したのが、
実行時エラー2467の前に、
実行時エラー29068
この再差を完了することができません。コードを中断し、再度実行してください。
と言うエラーが出るようです。そのままデバッグボタンを押すと、実行時エラー2467になるようです。
No.1ベストアンサー
- 回答日時:
エラー発生時の i の値はいくら?
イミディエイトウィンドウに表示させてみると良いかも。
(VBEでイミディエイトウィンドウが開いてないなら、Ctrl+G)
For i = CurrentProject.AllForms.Count - 1 To 0 Step -1
Debug.print i, CurrentProject.AllForms(i).Name 'この行を追加
DoCmd.DeleteObject acForm, CurrentProject.AllForms(i).Name
Next i
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Excel(エクセル) 【マクロ】エラーが発生⇒実行時エラー58既に同名のファイルが存在 5 2022/08/31 10:03
- Visual Basic(VBA) IBM Notes9のメールをExcelVBAにて送信するコードについての質問です。 以下のコードを 3 2023/06/21 17:58
- Visual Basic(VBA) ACCESS DAO で不要なテーブルのフィールド(列)の削除 4 2022/06/23 12:13
- Access(アクセス) 実行時エラー3131 FROM 句の構文エラーです について 7 2022/06/13 15:45
- Visual Basic(VBA) パーソナルXLSBのfuctionを呼び出すと「Functionが定義されていません」のエラーになる 2 2022/08/22 22:51
- Visual Basic(VBA) 【VBAエラー】Nextに対するForがありません 対策について 5 2022/11/21 21:26
- Visual Basic(VBA) 【VBA】ボタンに登録したマクロがエラーになる 4 2022/07/25 17:47
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) VBAでのMATCH関数 3 2022/10/17 19:06
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
非連結サブフォームのレコードソース
その他(データベース)
-
Access サブフォームでの選択行の取得
その他(データベース)
-
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
-
4
親フォームからサブフォームのレコードソースを設定
Access(アクセス)
-
5
アクセス 壊れた? 「ファイルが見つかりません」
Access(アクセス)
-
6
フォームウィンドウを最前面に表示したい(ACCESS)
Microsoft ASP
-
7
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
8
ACCSESS2013VBA フォームのレコードソースを変更する
その他(データベース)
-
9
テキストボックスのvalueとtextの違い
Visual Basic(VBA)
-
10
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
11
ACCESSでデータ読み取り専用を解除する方法
その他(データベース)
-
12
パラメータが少なすぎます。1を指定して下さい。""
Excel(エクセル)
-
13
アクセスVBAのMe!と[ ]
Access(アクセス)
-
14
「RunSQL」と「Execute」の違い
Access(アクセス)
-
15
Access2010 「演算子がありません」エラー
その他(データベース)
-
16
Access終了時にマクロまたはVBAの実行したい
その他(Microsoft Office)
-
17
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
18
Accessを開きなおすとテキストボックスの値がエラー#Name?になる
その他(データベース)
-
19
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
20
AccessからExcelにエクスポートする時に常に上書きしたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
実行時エラー3001「引数が間違...
-
ExcelVBA Range クラスの Page...
-
エクセルエラー13型が一致しま...
-
「コンパイルエラー:プロシー...
-
実行時エラー -'-2147417848
-
[Delphi] データセットは閉じて...
-
VBAがブレークモードになっ...
-
OLEDB.NETで接続できない
-
EXCEL/VBAで、自分のPCだけエラ...
-
実行時エラー48発生時のDLL特定...
-
VBで構造体を使うさ際の64k...
-
Excelで下記のようにマクロを作...
-
VB6+SQL サーバー 2000 で 実行...
-
プロシージャ名の取得
-
VBSで変数の宣言はできないので...
-
マクロについて教えてください...
-
「実行時エラー3001」のポップ...
-
VBAでの値のコピーのエラーにつ...
-
ExcelVBAのFindFirstエラ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
【Excel VBA】マクロをボタンに...
-
なぜこんな初歩的なVBAのIf文で...
-
マクロについて教えてください...
-
実行時エラー3001「引数が間違...
-
VBAがブレークモードになっ...
-
ExcelVBA Range クラスの Page...
-
VBSで変数の宣言はできないので...
-
VBS実行時エラー オブジェクト...
-
OLEDB.NETで接続できない
-
プロシージャ名の取得
-
EXCEL VBAマクロ中断でデバッグ...
-
ADODB.Streamを使用してUTF-8を...
-
VBAでのエラー
-
実行時エラー48発生時のDLL特定...
-
Outlook.ApplicationをCreateOb...
-
VB6+SQL サーバー 2000 で 実行...
-
実行時エラー -'-2147417848
-
「コンパイルエラー:プロシー...
おすすめ情報