Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro de triage-suppression

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion mat1817
  • 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
M

mat1817

Guest
Bonjour à tous et joyeux noël!!!!!

Dans le fichier ci-joint, vous trouverez 2 colonnes. la colonne "VERIF" me permet de savoir si l'article en colonne "ref" existe ou pas (depuis un autre classeur). Mais ce n'est pas la le problème... Existe t-il une marco ou autre astuce qui pourrait checker la colonne "VERIF" et supprimer toutes les lignes (et donc tous les articles) pour lesquelles une croix "x" se trouve en colonne "VERIF"?

Je vous remercie par avance

Cordialement,

Mat.
 

Pièces jointes

Dernière modification par un modérateur:
Trier par date Trier par votes
Re : Macro de triage-suppression

Bonjour mat1817,

Voici un exemple de macro à mettre dans un module standard et à lancer par le moyen que tu veux (événement de feuille de calcul, bouton de commande, ...)

Code: 
Sub Suppression()
Dim Lg As Long
With Sheets("Feuil1")
    Lg = .Range("A65000").End(xlUp).Row
    For i = Lg To 3 Step -1
        If Not IsError(.Cells(i, 2).Value) Then
            If UCase(.Cells(i, 2)) = "X" Then .Cells(i, 1).EntireRow.Delete
        End If
    Next
End With
End Sub

Bonnes fêtes de fin d'année.

Cordialement.
 
Vote positif 0 Vote négatif
Re : Macro de triage-suppression

Bonjour Papou-net, merci beaucoup!!!!! Je m'en vais essayer cette macro de suite!!!!

Bien cordialement, et bonnes fêtes de fin d'année également,

Mat.
 
Vote positif 0 Vote négatif
Re : Macro de triage-suppression

Bonjour le fil,

Une autre alternative :

VB: 
    Range("B:B").AutoFilter Field:=1, Criteria1:="x"
    Range("B3:B" & Rows.Count).SpecialCells(xlCellTypeVisible).EntireRow.Delete
    Range("B:B").AutoFilter Field:=1

cordialement
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

A
  • Résolu(e)
Autres Afficher le nombre de dates d'une colonne par rapport à une cellule
Réponses
4
Affichages
345
alain.pierrephie
A
  • Question Question
XL 2021 Mise à jour en lot de certaines cellules d'un TS.
Réponses
12
Affichages
479
TooFatBoy
A
  • Résolu(e)
Microsoft 365 Suppression d'une ligne d'un tableau avec une macro
Réponses
13
Affichages
1 K
Alain 79
A
T
  • Question Question
XL 2016 La macro efface les formules
Réponses
3
Affichages
667
JHA
J
Y
  • Résolu(e)
XL 2016 Comment supprimer des chiffres + texte en fin de cellule
Réponses
2
Affichages
639
Yayanne76
Y
G
  • Question Question
Microsoft 365 Avoir des classeurs maitres et les procédures dans un autre classeur.
2
Réponses
19
Affichages
2 K
GClaire
G
D
  • Résolu(e)
XL 2016 Peut-on intégrer une condition de temps à une cellule ?
Réponses
8
Affichages
678
Damstarr
D
R
  • Question Question
XL 2010 comparaison de plusieurs cellules
2 3
Réponses
30
Affichages
2 K
job75
G
  • Question Question
Microsoft 365 Transfert de données
Réponses
7
Affichages
987
GClaire
G
A
  • Résolu(e)
Microsoft 365 Alimenter automatiquement un tableau à partir des données d'un autre tableau en fonction d'un critère
Réponses
9
Affichages
2 K
Alexandrax971
A
P
  • Question Question
XL 2019 Bloquer la saisie dans une colonne sous condition
Réponses
1
Affichages
691
sylvanu
M
  • Résolu(e)
XL 2013 Liste déroulante avec affichage multiple
Réponses
10
Affichages
1 K
M.Ben
M
M
  • Question Question
XL 2016 MAJ nuage de points dans un graphe en fonction d'un filtre
Réponses
0
Affichages
718
Mooga
M
G
  • Question Question
Microsoft 365 Saut de ligne dans une cellule
Réponses
3
Affichages
879
GClaire
G
E
  • Résolu(e)
Microsoft 365 Boucle Checkbox ActiveX + Report dans TextBox
Réponses
5
Affichages
804
ExcLnoob
E
G
  • Question Question
Microsoft 365 Ajouter et supprimer des données sur tableau de bord
Réponses
6
Affichages
1 K
grace2023
G
W
  • Question Question
Autres Modification de donnée d’un tableau avec excel
Réponses
2
Affichages
568
Wouad
W
N
  • Résolu(e)
XL 2016 tableau de vente/gestion des stocks boutique : quelles formules ?!
2
Réponses
17
Affichages
3 K
Noëllie
N
D
  • Question Question
XL 2019 Concaténer plusieurs lignes à partir d'une référence en doublon
Réponses
5
Affichages
1 K
vgendron
F
  • Résolu(e)
Power Query Équivalent de la fonction excel MIN.SI.ENS
Réponses
2
Affichages
3 K
FDANIEL
F
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…