Bonjour, je cherche à inscrire la valeur "vrai" qui indique qu'un bouton bascule est coché dans une certaine ligne, en colonne 6.
Si le début de cette ligne (cellule("Ai" )) déjà rempli, je souhaite que "vrai" s'inscrive sur la ligne suivante, et ainsi de suite (toujours dans la colonne 6).
 
Mon code est le suivant :
 
Private Sub ToggleButton6_Click()
Sheets("donne" ).Cells(Ligne, 6).Value = ToggleButton6.Value
End Sub
 
Function Ligne() As Double
For i = 1 To 10
Next i
If Sheets("Donne" ).Cells(i, 1).Value = "" Then
Ligne = i
End If
End Function
 
Je suis débutant en VBA, et je ne connais pas trop la fonction "for i = a to b.
 
Si vous avez une idée merci de m'apporter votre aide !
 
PS : J'aimerais aussi que le mot "vrai" disparaisse lorsque l'on décoche le bouton..

For i = 1 To 10
  [tes instructions doivent être ici le Next i termine le For]
Next i