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

Maronnier Sup Ligne avec condition

  • Initiateur de la discussion Initiateur de la discussion ConseilRestauration
  • 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 !

C

ConseilRestauration

Guest
Bonjour à tous,
il y a déjà des posts concernant ce type de question, mais à chaque fois, c'est un peu un cas particulier...

Voilà mon pb :
J'ai un fichier 1000 ligne de matériel avec différentes familles :

j'ai besoin d'effacer avec une macro toutes les lignes de matériel qui sont égale à 0 en quantité. Mais je dois conserver les lignes vierges qui séparent les familles...

voilà mon idée :
analyse par ligne la colonne "libellé", si est nul alors passe a la ligne suivante
si ligne suivant la colonne libéllé est nul (et là j'ai du texte), alors regarde la colonne "quantité" si = 0 alors supprime ligne sinon passe à la ligne suivante.

Le souci c'est que je n'arrive pas à traduire ça en VBA...
Merci pour vos posts et votre temps 😉
pierre
 
Re : Maronnier Sup Ligne avec condition

Bonjour le Forum

Dim li As Long
Dim x As Long

li = Range("I65536").End(xlUp).Row

For x = li To 2 Step -1
If Cells(x, libellé).Value <> "" and Cells(x, quantité).Value = 0 Then
Rows(x).Delete
End If
Next x
 
Re : Maronnier Sup Ligne avec condition

bonjour bhbh,

mon fichier est transfert dans un autre classeur avec un copier colle valeur. Il n'y a donc pas de formules mais il peut y avoir zero comme rien (cellule vide)...

je n'avais pas pensé à ce point mais c'est clair qu'il a une grande importance!!!
merci
 
- 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

Réponses
7
Affichages
814
A
Réponses
4
Affichages
869
A
L
Réponses
9
Affichages
1 K
LordMarshall
L
D
Réponses
0
Affichages
722
Dédé82
D
T
Réponses
4
Affichages
6 K
ThomasGLT
T
C
Réponses
2
Affichages
849
C
S
Réponses
43
Affichages
5 K
Sonia2020
S
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…