Discussion :

[jackborogar]

Bonjour à tous,

J'aimerais une modification sur ce bout de code, je n'arrive pas à l'adapter.
Quand je lance ce code, ça fait l'exécution sur toute les feuilles. Or j'aimerais que ça s'exécute que sur la feuille "Données".

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 For Each ws In ActiveWorkbook.Worksheets
        With ws.Range("I:J")
            .NumberFormat = "0"
            .Value = .Value
        End With
    Next

Cordialement,

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
With ActiveWorkbook.Worksheets("Données").Range("I:J")
            .NumberFormat = "0"
            .Value = .Value
 End With

[jackborogar]

De nouveau, merci pour ton aide, ça fonctionne parfaitement