Suppression lignes
Fermé
GIGI
-
Modifié par irongege le 22/12/2010 à 16:35
michel_m Messages postés 16593 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 23 mars 2023 - 22 déc. 2010 à 19:02
michel_m Messages postés 16593 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 23 mars 2023 - 22 déc. 2010 à 19:02
A voir également:
- Suppression lignes
- Forcer suppression fichier - Guide
- Suppression compte instagram - Guide
- Suppression page word - Guide
- Suppression compte facebook - Guide
- Afficher toutes les lignes masquées excel ✓ - Forum Excel
1 réponse
michel_m
Messages postés
16593
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
23 mars 2023
3 292
Modifié par michel_m le 22/12/2010 à 17:27
Modifié par michel_m le 22/12/2010 à 17:27
bonjour
essaies
Michel
Vous programmez en VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...(P. Fauconnier/dvp)
essaies
Application.ScreenUpdating = False
For iRow = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If Cells(iRow, "G") = "NA" And Cells(iRow, "D") = "NA" Then
Rows(iRow).Delete
End If
Next
Michel
Vous programmez en VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...(P. Fauconnier/dvp)
Modifié par michel_m le 22/12/2010 à 19:03
On Error Resume Next ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas, 16).EntireRow.Delete On Error GoTo 0et pour les zéros il faudrait savoir s'il s'agit d'une saisie ou du résultat d'une formule...