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

garder le nombre de lignes indiquees et supprimer les lignes inutile

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

jaouad

XLDnaute Nouveau
Bonjours les amis
j'aimerai bien que vous m'aidiez la dessous amigos " une vrai casse tete":

cellule determinant le nombre de lignes a garder dans une palge determinée ( bien sure supprimer les autres dans la plage concerné) :

la cellule "A1" de la feuille 1 corresponde au 10 cellules de la plage "A1:A10" de la feuille 2 avec une forme specifique :couleur, etc...

la cellule "A2" de la feuille 1 corresponde au 10 cellules de la plage "A12:A21" de la feuille 2 avec une mise en forme differente de la plage precedente

ect......

je veux que si je tape 6 dans A1 feuille 1 ======> 6 lignes de la plage A1:A10 de la feuille 2 sont gardé avec bien sure la forme que je les ai attribué d'emblée

idem A2 feuille 1 avec plage A12:A21 de la feuille 2

c'est un peu compliqué je sais

mes amis je vous en serai tres tres reconnaissant pour vos aides
merci d'avance les amis
 
Trier par date Trier par votes
Re : garder le nombre de lignes indiquees et supprimer les lignes inutile

Bonjour Jouad le forum,
oui c'est possible, mais si je comprend bien il faut que l'on te fasse l'exemple? Tu parles de mise en forme de cellule à copier, comment on devine ce que tu veux? alors fais un exemple de ce que tu veux et tu auras ta réponse
a+
Papou 🙂
 
Vote positif 0 Vote négatif
Re : garder le nombre de lignes indiquees et supprimer les lignes inutile

Bonjour jaouad, Papou, le forum,

Un essai avec des noms définis (menu Insertion-Nom), une formule en colonne B (masquée) et une MFC à 3 conditions sur la plage B1:IV1000.

Suivant les valeurs en colonne A, la MFC applique la couleur rose, jaune ou grise. Une écriture n'est visible que sur les plages roses.

Il est très facile d'écrire une macro Worksheet_Change qui masque les lignes en jaune : il suffit de trouver en colonne B les cellules qui ont la valeur 0.

Mais on risque de masquer alors les valeurs en colonne A 😉

A+
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : garder le nombre de lignes indiquees et supprimer les lignes inutile

Re,

J'utilise dans cette version 2 feuilles, en Feuil2 se trouvent la MFC et la formule en colonne A (masquée).

Les 2 macros dans le Module1 (Alt+F11) :

Code: 
Sub Masque() [COLOR="Red"]'se lance par les touches Ctrl+M[/COLOR]
Dim plage As Range, cel As Range, mask As Range
Set plage = Sheets("Feuil2").Range("A1:A1000")
plage.EntireRow.Hidden = False
For Each cel In plage
  If Not IsError(cel) Then
    If cel = 0 Then Set mask = Union(cel, IIf(mask Is Nothing, cel, mask))
  End If
Next
If Not mask Is Nothing Then mask.EntireRow.Hidden = True
End Sub

Sub Affiche() [COLOR="Red"]'se lance par les touches Ctrl+A[/COLOR]
Cells.EntireRow.Hidden = False
End Sub

Les macros masquent ou affichent les lignes jaunes de la Feuil2.

Cette macro dans le code de la Feuil1 lance également la macro Masque quand on modifie la colonne A :

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then Masque
End Sub

A+
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : garder le nombre de lignes indiquees et supprimer les lignes inutile

bonjour le forum

pardon d'etre un peu en retard je viens de formater deux fois mon PC suite a une contamination par virus faisant eteindre automatiquement mon ordinateur.

mes amis je vous remercie fort pour vos aides precieuses a mon sujet.

merci amigos
🙂🙂🙂🙂🙂🙂
 
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

Discussions similaires

  • Question Question
Microsoft 365 Création automatique de feuille et le remplissage correspondant
Réponses
8
Affichages
320
gbinforme
G
P
  • Résolu(e)
Microsoft 365 Macro Excel pour effectuer des opérations sur les lignes et cellules adjacentes
2
Réponses
19
Affichages
549
Perceval973
P
W
  • Résolu(e)
XL 2016 Placer mes photos dans la colonne A, [A3], [A4],etc, jusqu'en [A99] selon le prénom et le nom colonnes B et C
2
Réponses
26
Affichages
1 K
Webperegrino
W
C
  • Résolu(e)
Copier/Masquer des lignes de couleur pour alimenter un tableau
Réponses
9
Affichages
801
vgendron
A
  • Résolu(e)
XL 2016 Passer d'une MFC à une macro pour supprimer le bazar dans les règles.
2 3
Réponses
42
Affichages
2 K
TooFatBoy
M
  • Question Question
XL 2021 Rechercher dans une matrice le texte d'une cellule et copier les 10 lignes situées en dessous de ce texte retrouvé
Réponses
2
Affichages
467
JHA
J
G
  • Résolu(e)
XL 2016 Pb de tri et sous totaux
2
Réponses
27
Affichages
1 K
Gestionnaire_rh
G
  • Question Question
Microsoft 365 RESOLU - Macro - Recherche de lignes identiques et ressortir les lignes uniques
Réponses
8
Affichages
824
Akortys
  • Question Question
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
631
Lu76Fer
C
  • Résolu(e)
Autres Code VBA pour recherche et copie/coller de ligne avec mot clé.
Réponses
12
Affichages
851
Corentin26270
C
T
  • Résolu(e)
XL 2019 Calculer le nombre de lignes pour impression (pdf ou physique)
Réponses
1
Affichages
313
ThierryP
T
G
  • Question Question
Microsoft 365 Choix et export de données (Résolu)
Réponses
4
Affichages
881
GClaire
G
D
  • Question Question
Microsoft 365 Application.WorksheetFunction.VLookup ne fonctionne pas au delà de 8500 lignes
Réponses
4
Affichages
730
DimiJuju
D
P
  • Résolu(e)
Microsoft 365 Supprimer lignes si jour diffèrent de samedi ou dimanche dans cellule
Réponses
7
Affichages
883
Phil69970
G
  • Question Question
Microsoft 365 Saut de ligne dans une cellule
Réponses
3
Affichages
777
GClaire
G
M
  • Résolu(e)
Microsoft 365 Prendre les 10 1ère valeur d'une plage en fonction de 2 critères
2 3
Réponses
43
Affichages
3 K
merinos-BernardEtang
S
  • Question Question
Microsoft 365 Supprimer les lignes doublantes qui ont le même identifiant
Réponses
3
Affichages
528
sylvanu
Y
  • Résolu(e)
XL 2016 Comment supprimer des chiffres + texte en fin de cellule
Réponses
2
Affichages
533
Yayanne76
Y
M
  • Résolu(e)
XL 2019 Copier plusieurs lignes et les insérer plusieurs fois sans boucle
2
Réponses
15
Affichages
1 K
miloo
M
T
  • Question Question
XL 2010 Supprimer les lignes en doubles (multi critères)
2
Réponses
18
Affichages
2 K
oguruma
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…