フォーム上の全てのコントロールを取得したいです。
(サブフォームも含め)
自分なりにVBAで考えてみたのがこれです。
Sub test()
Dim 数 As Long
For Each 数 In Form_フォーム1.Controls.Count
’Debug.Print ?
End If
Next
End Sub
でもこれだけでもデバックしてみると
「コンハ゜イルエラー
for Eachは、コレクション オブジェクトまたは配列でのみ繰り返しを実行します。」
となります。
答えを教えてください!
よろしくお願いします。
(アクセス2003です)
No.2
- 回答日時:
以下の方法がイメージしやすいかも?
(自フォームのコントロールを取得)
Dim ctl As Control
For Each ctl In Me.Controls
Debug.Print ctl.Name
Next
For Each ctl In Me.FSUB.Form.Controls '☆1
Debug.Print ctl.Name
Next
※ ☆1での FSUB は、自フォームへ配置したサブフォームコントロールの名前です。
(☆1のところは、サブフォーム内のコントロールを取得)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) outlook マクロが終了しません。 1 2022/09/02 11:14
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
- Visual Basic(VBA) VBA This Workbookモジュールを別ファイルにコピーする方法 1 2022/09/14 01:51
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
- Visual Basic(VBA) VBAが止まります。 1 2022/09/02 14:51
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
Access サブフォームでの選択行の取得
その他(データベース)
-
アクセス 壊れた? 「ファイルが見つかりません」
Access(アクセス)
-
コントロールの存在確認
Visual Basic(VBA)
-
-
4
アクセスVBAのMe!と[ ]
Access(アクセス)
-
5
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
6
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
7
【ACCESS】フォーム名/コントロール名を文字列型変数で指定するには
Access(アクセス)
-
8
どこにもフォーカスを当てたくない
Access(アクセス)
-
9
[Access]帳票フォームにて連続する非連結コントロールに個々の値を入れるには
Access(アクセス)
-
10
ACCESSのフォームで次のレコードに移動しない方法を教えてください
その他(データベース)
-
11
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
12
Access コンボボックスの値をクリアしたい。
PowerPoint(パワーポイント)
-
13
Access 最後のレコードに到達するまでループ処理を行う方法
Access(アクセス)
-
14
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
15
Accessでテーブル名やクエリ名一覧の抜き出し
Access(アクセス)
-
16
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
17
スクロールバーをVBAで操作したい
Access(アクセス)
-
18
フォームの高さを数値で指定したいのですが
Excel(エクセル)
-
19
サブフォームを非表示させる方法を教えて下さい
その他(Microsoft Office)
-
20
Access終了時にマクロまたはVBAの実行したい
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
サブフォームの新規レコードに...
-
アクセス フォームが存在する...
-
リストボックスの選択解除
-
VB.net(VB)で、フォームにExcel...
-
Access2010で動的コントロール...
-
アクセスVBA フォームのス...
-
Accessでフォームから別フォー...
-
PDFフォームに本日の日付を自動...
-
Access 無操作の場合、自動で閉...
-
PDFフォーム内で日付計算したい...
-
ユーザーフォーム上にアイコン...
-
VBAでフォームのスクロールバー...
-
accessで2つ以上のフォームを起...
-
フォームの左上のアイコンだけ...
-
ディスプレイ解像度より大きな...
-
3フォームの重なり順を変えな...
-
ボタン押下でサブフォームのレ...
-
サブフォームの行ごとにコンボ...
-
子フォームから親フォームのオ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAにてメッセージボックスを最...
-
VB.net(VB)で、フォームにExcel...
-
Accessでフォームから別フォー...
-
リストボックスの選択解除
-
Googleフォーム・複数人の申し...
-
ユーザーフォーム上にアイコン...
-
アクセスVBA フォームのス...
-
VBプログラムの終了
-
アクセス フォームが存在する...
-
サブフォームの新規レコードに...
-
サブフォームの行ごとにコンボ...
-
PDFフォームに本日の日付を自動...
-
accessで2つ以上のフォームを起...
-
メッセージボックスの背景色
-
PDFフォーム内で日付計算したい...
-
VBA リストボックスをダブルク...
-
Access 無操作の場合、自動で閉...
-
ディスプレイ解像度より大きな...
-
フォーム上の全てのコントロー...
-
ToolStripStatusLabelを固定し...
おすすめ情報