vba - VBA Excel でコントロールとして暗くする

Question

ユーザーフォームのチェックボックスを調べて、ユーザーの選択に従ってピボットテーブルに表示しようとしています

次のコードを使用します。

Dim mthIdx As Long
Dim nm As String
Dim c As Control
With ActiveSheet.PivotTables(CakePivot2).PivotFields("month")
    For mthIdx = 1 To 12
        nm = "CheckBox" & mthIdx
        Set c = Controls(nm)
        .PivotItems(mthIdx).Visible = printing_rep.c.Value
    Next
End With

ユーザーフォームのプライベートサブに配置すると正常に動作しますが、別のモジュールに配置しようとすると、「サブまたは関数が定義されていません」というエラーが発生し、コードで「コントロール」が強調表示されます。誰かが私が間違っていることを知っていますか?