Bonjour,
... Par contre je serai quand même bien intéressé de savoir comment sélectionner ces foutues checkbox vu le teps que j'y ai passé!
...
Première étape, augmente temporairement le zoom de l'affichage à 150% ou plus dans Excel.
Clique droit sur le "checkbox" afin d'obtenir l'affichage des poignées de redimensionnement.
Assure-toi que celles du haut soient bien dans la cellule.
(Quand tu recopieras les lignes, ce positionnement suivra.)
Tu peux remettre le zoom à son origine.
Le code suivant sélectionnera le "checkbox" situé dans la cellule indiquée. Dans le code suivant, c'est la cellule i22.
Sub Test()
Dim sh As Shape
For Each sh In ActiveSheet.Shapes
If Not Intersect(Range("I22"), sh.TopLeftCell) Is Nothing Then sh.Select
Next sh
End Sub
Il ne restera qu'à adapter dans ton code pour la suite.
Les "checkbox" dans les feuilles, gérés par programmation, ne sont pas, à raison, les préférés des programmeurs séniors. Ils occasionnent souvent bien des soucis.
ric