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

Supprimer des lignes sous condition

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

boby

Guest
Bonjour à tous,

je suis le nouveau de la classe

j'ai un fichier dont je souhaiterai supprimer quelques lignes sous conditions😡 :

- colonne H : supprimer toutes les lignes dont les codes ISIN ne commençant pas par "AT" - "DK" - "FI" - "GB" - "IE" - "JP" - "NL" - "PT" - "XS0"
ps: (0=zero)
😕
- colonne W: supprimer toutes les lignes dont les cellules ne contiennent pas "UNM" ou "ICMO" conserver les cellules vides
😱
- trier par ordre croissant les colonnes N puis O
🙄
- sauter trois lignes entières quand dans la colonnes N on passe de "C" à "E" et de "E" à "X"

- mise en page:
uniformiser les lignes et les colonnes avec un zoom à 82%, des cellules centrées ajustée, les colonnes J K et L en separateur de milliers, et une couleur de remplissage blanche puis fenetres/reorganiser/horizontal

voici un echantillon du fichier

merci d'avance pour votre aide
 

Pièces jointes

Dernière modification par un modérateur:
Trier par date Trier par votes
Re : Supprimer des lignes sous condition

re,

Bizarre que ca te lance l'impression de toutes tes feuilles, je suis sur qu'il doit exister une option, mais ou ???

Sinon avec un bout de code tu dois pouvoir bidouiller, mais c'est pas terrible. Un truc du genre :
Sub test()
Dim i%
For i = 1 To Sheets.Count
If Not Sheets(i).UsedRange = "" Then
'ici tu lances l'impression de ta feuille
End If
Next i
End Sub

@+
 
Vote positif 0 Vote négatif
Re : Supprimer des lignes sous condition

Bonjour,

J'ai un petit soucis j'ai réalisé une macro avec plusieurs suppressions sous condition,
mais ma macro met énormément de temps à se réaliser ...
Y-aurait-il un moyen de réduire ce laps de temps (j'ai déjà réduit la fenêtre comme j'ai pu le lire dans un post) ?

Dim ligne As Double

For ligne = Range("A65536").End(xlUp).Row To 1 Step -1
If Cells(ligne, 1) = "" Then Rows(ligne).Delete
If ...
Next ligne

Merci.
 
Vote positif 0 Vote négatif
Re : Supprimer des lignes sous condition

Salut,

Essaye peut etre un truc de ce genre (ca permet de figer l'ecant au moment ou la macro s'execute):
Code: 
Sub Tamacro()
 
Application.ScreenUpdating = False
[COLOR=seagreen]'ton code[/COLOR]
Application.ScreenUpdating = True
End Sub

@+
 
Vote positif 0 Vote négatif
Re : Supprimer des lignes sous condition

Bonsoir,

j'ai quelques notions sur VBA mais je ne connais pas du tout la fonction SelectCase

Pouvez-vous me dire à qu'elle est son utilité ? Comment elle fonctionne ? (et si éventuellement vous pouvez me donner un exemple)

Je vous remercie beaucoup
 
Vote positif 0 Vote négatif
Re : Supprimer des lignes sous condition

Salut,

Et bien avec ton exemple, cela donnerai quelque chose de ce genre :

Code: 
Dim ligne As Double

Application.ScreenUpdating = False
For ligne = Range("A65536").End(xlUp).Row To 1 Step -1
Select Case Cells(ligne, 1) 
Case "" or 1 or "aa"
     Rows(ligne).Delete
Case 2 or "bb"
     Rows(ligne).Interior.ColorIndex=6
End Select
Next ligne
Application.ScreenUpdating = True

Je t'ai mis plusieurs conditions dans la case ainsi que 2 case afin que tu comprennes le mécanisme. Il te suffit simplement d'adapter selon tes besoins.

@+
 
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

R
  • Question Question
Microsoft 365 Tableau de progressions
Réponses
10
Affichages
516
Rosario.
R
  • Résolu(e)
XL 2021 Supprimer les lignes qui contiennent des cellules vides dans les colonnes "A à M" à partir de la ligne 5
Réponses
6
Affichages
790
Usine à gaz
N
  • Question Question
Microsoft 365 VBA Supprimer lignes en fonction des valeurs d'une cellule
Réponses
11
Affichages
3 K
Phil69970
  • Résolu(e)
Microsoft 365 Supprimer les lignes "entières" en doublon selon critères
Réponses
9
Affichages
785
Usine à gaz
Y
  • Question Question
XL 2019 Macro pour supprimer des lignes selon caractères
Réponses
2
Affichages
812
Yoshi0302
Y
F
  • Question Question
Microsoft 365 Suppression des lignes ne contenant pas 2 mots avec VBA
Réponses
2
Affichages
690
Fatine
F
M
  • Résolu(e)
Microsoft 365 Comparer le contenu d'une ligne avec d'autres lignes
Réponses
4
Affichages
1 K
mahakas
M
A
  • Question Question
Microsoft 365 VBA code pour inserer des lignes une condition
Réponses
4
Affichages
869
AEz
A
P
  • Résolu(e)
Microsoft 365 Passer des lignes quand une condition est remplie en Macro
Réponses
11
Affichages
2 K
sylvanu
B
  • Question Question
Microsoft 365 VBA Supprimer des lignes de tableau avec une sélection manuelle
Réponses
8
Affichages
4 K
Benoit84
B
L
  • Question Question
Microsoft 365 Excel Message erreur à supprimer
Réponses
11
Affichages
1 K
Ludo34360
L
C
  • Résolu(e)
XL 2016 Remplir automatiquement un tableau d'après des conditions et des valeurs
Réponses
11
Affichages
2 K
ERIC S
D
  • Question Question
XL pour MAC Réaffectation (très complexe) de données dans des lignes supplémentaires générées par Macro
Réponses
3
Affichages
1 K
didcac
D
C
  • Résolu(e)
XL 2019 VBA supprimer des lignes en fonction d'une condition
2 3
Réponses
36
Affichages
9 K
Céline49
C
  • Résolu(e)
Microsoft 365 Supprimer des caractères non visibles en passant par une variable tableau
Réponses
5
Affichages
2 K
Patrice33740
D
  • Question Question
XL 2016 [RESOLU] Copie d'une zone selon contenu d'une cellule et mise a jour de certaines cellules de la zone et format date
Réponses
0
Affichages
1 K
dupuy.mathias
D
H
  • Question Question
XL 2016 Supprimer des lignes sous condition
Réponses
5
Affichages
678
job75
C
  • Question Question
Autres Copier valeur cellule variable dans autre feuille sous condition Excel 2007
Réponses
1
Affichages
2 K
claivier_58
C
C
  • Question Question
Autres VBA - Copier valeur cellule variable dans autre feuille sous condition Excel 2007
Réponses
3
Affichages
2 K
claivier_58
C
A
  • Question Question
XL 2013 Supprimer des lignes sous une seul condition "VBA"
Réponses
5
Affichages
1 K
Anr1
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…