Sélectionner toutes les feuilles d'un classeur

Bonjour

mon message à visiblement disparu, je le remet donc

je souhaite sélectionner toutes les feuilles d'un classeur dans une macro .

les feuilles de mon classeur sont crées par une première macro en fonction de différentes données, ce qui signifie, que le nombre de feuille peut varier ainsi que leurs noms.

une fois mes feuilles crées je souhaite mettre les colonnes D à F de toutes les feuilles en format numérique.

j'ai fait une macro pour cela , mais elle ne fonctionne que sur la feuille active

Sub centrer()
'

For Each ws In Worksheets
Columns("D:F").Select
Selection.NumberFormat = "0.0"
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Range("A1").Select
Next
End Sub


merci de votre aide