Re : Selectionner feuille avec une variable
Hello,
Essaye avec ce code :
Sub dateplanning()
Dim NumeroOnglet
For NumeroOnglet = 1 To 31
Worksheets(NumeroOnglet).Select
Worksheets(NumeroOnglet).Unprotect
Range("d1") = Sheets("mois").Cells(1, 2).Value
Worksheets(NumeroOnglet).Protect
Next NumeroOnglet
End Sub
Ca devrait aller chercher la valeur de la cellule "B1" de la feuille mois pour remplir la cellule "D1" des autres feuilles (dont le nom est 1, 2, 3...). Est-ce bien ça que tu cherchais ?