C'est une manie de "je cherche à tout sélectionner d'un tout"
Puisqu'on te dit que ça sert à rien de SELECTIONNER
Remarque : dans ton fichier il n'y a pas trace de Mise en forme conditionnelle ou de bouton d'option quelconque...
Mais si tu veux mettre des oui partout dans la colonne E pas besoin de sélectionner quoique ce soit :
YAKA écrire :
Sub test()
Dim o As Range
For Each o In [B2].CurrentRegion.Resize(, 1)
o.Offset(, 3) = "Oui"
Next
End Sub
...et basta !
A+