Sub ValeursSeules() Dim Sht As Worksheet Application.ScreenUpdating = False For Each Sht In Worksheets With Sht .Select Range(.UsedRange.Address) = (Range(.UsedRange.Address)) End With Next Sht End Sub
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 875 118 membres 28 nouveaux aujourd'hui 16 153 membres club