Bonjour,

Tout d'abord je tiens à précisé que je suis un très grand débutant pour ce qui est du VBA mais le sujet m'intéresse tout particulièrement.

On m'a donné un début de fonction à mettre dans un module pour gérer plusieurs UserForm à la fois mais je ne comprends pas très bien les lignes.
SI quelqu'un peut me traduire ces lignes de codes afin que je les comprennes au mieux ce serait superbe !

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Public Sub AjouterPanier(NomUsf As UserForm)
    For Each ctrl In NomUsf.Controls
        If TypeName(ctrl) = "Checkbox" Then
            CtrlText = NomUsf.Controls("Textbox" & Right(ctrl.Name, Len(ctrl.Name) - 8))
            Qt = CtrlText.Object.Value
 
 
        End If
    End If
End Sub


Pour plus de précision sur le projet, je souhaite, lorsqu'on coche une CheckBox et donne un nombre dans une TextBox qu'un nom et un nombre s'affiche dans une feuille en appuyant sur un button. Il y a plusieurs UserForm comme ceci quasiment identique.


Merci d'avance