トップ > 逆引きで学ぶ ユーザーフォーム&コントロール > 1-25　フォーム上のコントロールのコレクションを取得する

Private Sub UserForm_Click() 'フォーム上の全コントロールの名前を取得
    Dim myCtl As MSForms.Control
    For Each myCtl In Me.Controls
        MsgBox myCtl.Name
    Next
End Sub

Private Sub UserForm_Click() 'フォーム上の全コントロールのタイプを取得
    Dim myCtl As MSForms.Control
    For Each myCtl In Me.Controls
        MsgBox TypeName(myCtl)
    Next
End Sub

書籍紹介140以上のサンプルファイル付き！

知りたいがすぐわかる！　やりたいがすぐできる！
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」（Kindle版）
ユーザーフォームを扱えると、VBAでできることが大きく広がります！
本書では、知りたいこと、やりたいことから、逆引きで学びを深められます。

■ 購入：amazon