lNouveau venulragInscrit le :16/03/2016Dernière activité :17/03/2016 à 13:23Version d'Excel :2003Messages2Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Sujets créés par lragDateForumSujetExtrait du message16/03/2016 à 14:16Excel - VBACheckBoxJ et TextBoxJJ'ai une bonne centaine de CheckBox et TextBox qui fonctionne sur ce code. Private Sub CheckBox1_Click() If Me.CheckBox1 = True Then Me.TextBox1.Value = "1" Else Me.TextBox1.Value = "" End If End Sub j'ai tenté dans le UserForm_Initialize() pour raccourcir mon code Dim j As String For J = 1 To 158 I...Forums