as Control について (ID:78316)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すいません、Meじゃないですね。 フォームもByrefで一緒に渡してあげてください。 'フォームで call enabled_false(Me, "Check1") '標準モジュールで public Sub enabled_false(frm As Form, str As String) Dim lCnt As Long For lCnt = 5 To 11 frm.Controls(str)(lCnt).Enabled = True Next End Sub