Filtrer et effacer les 0

tinou63 · 9 Juin 2011

Bonjour à tous,

J'aimerai utiliser les VBA avec Excel 2007 pouvoir filtrer certaines colonnes et effacer les 0. Idem choix de colonne pour filtrer et effacer les #N/A.
Merci pour votre aide.
Bonne journée.

julberto · 9 Juin 2011

Re : Filtrer et effacer les 0

Bonjour tinou63,

Tu n'aurais pas par hasard un p'tit bout de fichier à nous proposer ? Ce serait tellement plus efficace, plus facile et plus rapide.

cordialement

Etienne2323 · 9 Juin 2011

Re : Filtrer et effacer les 0

Salut tinou63,
voici qui devrait faire le travail. Le code gère les 0 et tous les types d'erreurs possibles.

VB:

Option Explicit

Sub Test()
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To Range("A65536").End(xlUp).Row
    On Error GoTo GestionErreur
    If Range("A" & i).Value = 0 And Range("A" & i).Value <> "" Then Cells(i, 1).ClearContents
Reprendre:
Next i

Exit Sub

GestionErreur:
Range("A" & i).ClearContents
On Error GoTo 0
GoTo Reprendre

End Sub

Bonne continuité,

Étienne

Filtrer et effacer les 0

tinou63

Guest

julberto

XLDnaute Occasionnel

Etienne2323

XLDnaute Impliqué

Discussions similaires

Filtrer et effacer les 0

tinou63

Guest

julberto

XLDnaute Occasionnel

Etienne2323

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency