Multiplier une colonne par une valeur sur chaque feuille

bonjour,

j'ai créé ce programme qui multiplie la colonne B par 9,81 mais j'aimerai le faire pour chaque feuille. Pouvez vous m'aider s'il vous plait.

Sub Multiplier()
Dim m As Range

For Each m In Range("B1:B33")
m = m * 9.81

Next
End Sub

Bonsoir,

une proposition en vitesse

Sub Multiplier()
    Dim m As Range
    For Each sh In Worksheets
        With sh
            For Each m In .Range("B1:B33")
                m = m * 9.81
            Next
        End With
    Next sh
End Sub
Rechercher des sujets similaires à "multiplier colonne valeur chaque feuille"