Salut. Je voudrais chercher si la feuille contient une checkbox d'un certain nom et si elle existe la renommer.

J'ai ce bout de code mais il ne semble pas fonctionner :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim Chk As CheckBox
 
For Each Chk In Wb.Worksheets(1).CheckBoxes
	If Chk.Name = "Checkbox1" Then Chk.Name = "cbEspèces"
Next Chk
Merci par avance