Microsoft 365 Supprimer ligne si cellule différente d'une valeur numérique et si vide

Créer une discussion
Répondre
  • Initiateur de la discussion Initiateur de la discussion pierrof
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
P

pierrof

XLDnaute Occasionnel
Bonjour,

Dans mon nouveau projet, j'aimerais à l'aide d'une macro supprimer les lignes de mon tableau (tableau pouvant atteindre 15000 lignes) si la valeur de la cellule A n'est pas un nombre ou si elle est vide.

Je laisse un fichier exemple.

Merci d'avance de votre aide.

Cordialement
 

Pièces jointes

Solution
Staple1600
Re

=>Phil
J'ai donc ouvert ta PJ

Donc sur la base du fichier de Phil basé sur ma base
(oui je sais cela fait beaucoup de base 😉)
Je change mon fusil d'épaule
et je propose cette autre façon de faire
VB: 
Sub Suppr_ALPHA_VIDE()
Dim l&, r As Range
Application.ScreenUpdating = False
l = ActiveSheet.UsedRange.Rows.Count
Columns("A:N").Sort key1:=Cells(2), Order1:=xlDescending, Header:=xlYes
Set r = Range("N2:N" & l)
r.FormulaR1C1 = "=IF(OR(ISTEXT(RC[-13]),ISBLANK(RC[-13])),""Staple"",1)"
r = Range("N2:N" & l).Value
r.SpecialCells(xlCellTypeConstants, 2).EntireRow.Delete
Columns(14).Clear
End Sub
PS; je te laisse tester sur 15000 lignes
(car mon PC n'est point véloce)
😉
Trier par date Trier par votes
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Résolu(e)
Microsoft 365 VBA supprimer ligne si cellule vide
Réponses
2
Affichages
95
duplaly
D
P
  • Résolu(e)
Microsoft 365 Suppression lignes par rapport à une date
2 3 4
Réponses
50
Affichages
667
pierrof
P
T
  • Question Question
XL 2019 tableau , cellule protégé et ligne vide
Réponses
2
Affichages
124
sylvanu
sylvanu
O
  • Question Question
XL 2021 copie ligne en fonction d'une cellule
Réponses
3
Affichages
107
wDog66
wDog66
P
  • Résolu(e)
Microsoft 365 Macro Excel pour effectuer des opérations sur les lignes et cellules adjacentes
2
Réponses
19
Affichages
383
Perceval973
P
D
  • Question Question
XL 2021 Fusion de cellule si vide à côté
Réponses
11
Affichages
347
job75
job75
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
147
Yogean
Y
N
  • Question Question
Microsoft 365 Cherche a dupliquer des lignes en fonction d'un nombre indépendant sans macro
2
Réponses
16
Affichages
2 K
crocrocro
C
zayab
  • Question Question
Insérer une ligne vide à chaque cellule non vide
Réponses
2
Affichages
265
sylvanu
sylvanu
P
  • Question Question
Microsoft 365 Extraire la totalité du contenu d'une cellule si une cellule commence par un nombre
2
Réponses
16
Affichages
677
PR.
P
C
  • Résolu(e)
XL 2013 Renvoyer 2 dans la cellule
Réponses
2
Affichages
264
candido57
C
O
  • Résolu(e)
Microsoft 365 Effacer le contenu de cellules si une autre cellule est vide
Réponses
9
Affichages
372
Olihoes
O
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
944
fanfan38
fanfan38
E
  • Question Question
Microsoft 365 Mise en forme conditionnelle d'une ligne avec critère.
Réponses
9
Affichages
471
TooFatBoy
TooFatBoy
M
  • Résolu(e)
XL 2019 recherche et comptage cellule avec critère
Réponses
8
Affichages
148
michelf
M
J
  • Question Question
XL 2010 définir un nom de cellule en fonction de la valeur d'une autre
Réponses
12
Affichages
999
jojo4738
J
F
  • Résolu(e)
Microsoft 365 copier coller des colonnes en fonction de la valeur d'une cellule
Réponses
8
Affichages
828
loloboc
L
O
  • Question Question
XL 2019 erreur de valeur sur formule
2
Réponses
18
Affichages
1 K
olivier1984
O
C
  • Résolu(e)
Microsoft 365 Problème VBA lors de l'affichage de ligne masquée
2
Réponses
21
Affichages
920
Chris Linefield
C
A
  • Résolu(e)
Microsoft 365 programme VBA pour "importer" les valeurs de certaines cellules d'une autre feuille appartenant à une ligne que j'identifie par un n°
2
Réponses
27
Affichages
891
arnomorize
A
Retour