gmb a écrit :
Bonjour et bienvenue sur le forum
Je verrais ça en 2 étapes :
Selection = "=R1C1"
Selection.NumberFormat = "yyyymmdd"
Bye !
Hello,
Merci pour la réponse mais ça ne marche pas non plus.
En plus, je veux l'appliquer sur une plage entière (A8,A8.end(xldown)).
ci dessous le code:
Range(("A8"), Range("A8").End(xlDown)).Offset(0, 14).Select
For Each cellule In Selection
cellule.FormulaR1C1 = "=TEXTE(RC[-14],""yyyymmdd"")"
Next cellule
Merci