Réduire une macro

Bonjour,

serait-il possible de réduire cette macro ? en quelques lignes...

Range("o22:O33").Select

ActiveCell.Value = 0

Range("o23").Select

ActiveCell.Value = 0

Range("o24").Select

ActiveCell.Value = 0

Range("o25").Select

ActiveCell.Value = 0

Range("o26").Select

ActiveCell.Value = 0

Range("o27").Select

ActiveCell.Value = 0

Range("o28").Select

ActiveCell.Value = 0

Range("o29").Select

ActiveCell.Value = 0

Range("o30").Select

ActiveCell.Value = 0

Range("o31").Select

ActiveCell.Value = 0

Range("O32").Select

ActiveCell.Value = 0

Range("O33").Select

ActiveCell.Value = 0

Range("O35").Select

ActiveCell.Value = 0

Range("O36").Select

ActiveCell.Value = 0

bonjour,

essaie ceci

edit : Gyrus (que je salue) est plus attentif que moi.

Range("O22:O36") = 0

Bonjour,

Range("O22:O33") = 0
Range("O35:O36") = 0

Cordialement.

Merci H2SO4 et Gyrus !!! ça tourne

Cordialement