Bonjour le forum,
Dans mon projet, j'ai un code qui met automatiquement une checkbox en colonne E à côté des lignes ayant des valeurs.
Je souhaiterais maintenant mettre un code dans un bouton. lorsqu'on clique sur ce bouton, les lignes dont la checkbox est cochée sont déplacées dans une autre feuille, à la suite les unes des autres.
Donc dans un premier temps, je recherche toutes les checkbox ayant la valeur TRUE dans ma feuille...
Je précise que j'ai piqué ce code en cherchant un peu...
Mais suis bien incapable de trouver la suite...
Une piste à me donner?
Merci!
Dans mon projet, j'ai un code qui met automatiquement une checkbox en colonne E à côté des lignes ayant des valeurs.
Je souhaiterais maintenant mettre un code dans un bouton. lorsqu'on clique sur ce bouton, les lignes dont la checkbox est cochée sont déplacées dans une autre feuille, à la suite les unes des autres.
Donc dans un premier temps, je recherche toutes les checkbox ayant la valeur TRUE dans ma feuille...
Code:
Private Sub CommandButton1_Click()
Dim i, label, default_value
i = 2
For i = 2 To ActiveSheet.OLEObjects.Count
If ActiveSheet.OLEObjects(i).Object.Value = True Then
'déplace la ligne (colonne A à G) associée au checkbox coché dans une autre feuille à la suite (même formatage)
End If
Next
End Sub
Je précise que j'ai piqué ce code en cherchant un peu...
Mais suis bien incapable de trouver la suite...
Une piste à me donner?
Merci!