Formules VB dans zone nommée

Bonjour ccm

Oui, c'est tout à fait ce que cherchais, merci beaucoup.

Carton plein.

Comme Cjoint fait disparaître les fichiers, je remets le code ici pour la postérité :

Sub Start()
Dim f As String, cel As Range
f = "=IF(RC[-2]<>3,""oui"",""non"")"
For Each cel In Range("plage")
  cel.FormulaR1C1 = f
Next cel
End Sub

Encore merci et bonne soirée

Bonjour à tous les deux

As tu essayé comme ça ?

J'ai nommé plage la zone "F5:F16"

Sub Start()
Dim f As String, cel As Range
f = "=IF(RC[-2]<>3,""oui"",""non"")"
For Each cel In Range("plage")
  cel.FormulaR1C1 = f
Next cel
End Sub

https://www.cjoint.com/c/MCAtonnxEcB

Cdlmnt

Non, je n'ai pas essayé.
De toute évidence ça ne peut pas régler mon problème.

Je ne m'exprime peut-être pas bien, ou vous n'avez pas lu ma question.

Je suis désolé mais ça n'avance pas.

Non, ce n'est pas le problème.

On tourne en rond.
Ce n'est pas la formule qui me pose problème !

Peu importe la formule, celle-là ou une autre ...

L'objectif c'est de mettre une formule, quelle qu'elle soit, dans toutes les cellules de la colonne E, de ma zone nommée "MonTableau" ...

Et celà via VB. Je fais ceci pour réinitialiser les formules, ayant subi des effacements involontaires par des utilisateurs ...

Non, en colonne C.
Voici un exemple pour davantage de simplicité :

https://www.cjoint.com/c/MCApALnvMKv

Merci pour l'aide.

En fait, via la macro, je dois implémenter cette formule dans toutes les cellules de la colonne E, de ma zone nommée "MonTableau"

J'ai du transformer un peu la formule pour que ça fonctionne :

[F5].FormulaR1C1 = "=IF(RC[-2]<>3,""oui"",""non"")"

"En colonne E" désigne bien toutes les cellules de la 5ème colonne.

Désolé je suis très lent ...

Bonjour Yg

Du code VBA.

Je veux réinitialiser ces formules dans mes 2 dernières colonnes périodiquement.

Merci !

bonjour, ce sont des formules ou du code VBA, ou encore autre chose?