Bonjour le forum!

Je bute sur une problématique liée à l'utilisation de CheckBox dans un Userform.
Je souhaite renommer les CheckBox en fonction du nom des feuilles de mon classeur. Mais je ne trouve pas de solution...

Voici mon code pour l'instant. Je sais déjà récupérer le nom des différentes feuilles mais la propriété .Name appliquée à Controls n'est pas correcte.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub UserForm_Initialize()
 
Dim sh As String
Dim n As Integer
 
    n = n + 1
 
    For n = 1 To Sheets.Count
        sh = Sheets(n).Name
        Controls("CheckBox" & n).Name = sh
    Next n
 
End Sub
Merci d'avance pour vos commentaires,

Bonne journée à tous!