XL 2010 créer un nombre de lignes supplémentaires selon critère colonne T

deps

XLDnaute Junior
Bonjour Forum

Dans le tableau des la feuille REC du fichier joint

je souhaiterais qu à chaque fois que le nombre (n) affiché en colonne T (= nombre maxi d'équipes engagées) >1 alors
une macro crée les lignes manquantes en fin de tableau puis retrie le tableau selon la colonne (U et C)
Exemple 1
En ligne 2 - le club de Lyon a 2 équipes inscrites (chiffre 2 en colonne T)
Comment faire pour créer en fin de tableau la même ligne avec t =1 (l'équipe n°1)

exemple 2
L'équipe de lille a inscrit 3 équipes en colonne T
il faut donc créer la ligne avec t=1 puis celle avec t=2


Quelqu'un aurait-il une idée ?

merci au fortum
Deps
 

Pièces jointes

  • macro_nombrev1.xlsx
    11.4 KB · Affichages: 29

deps

XLDnaute Junior
Bonjour Mapomme

Merci pour cette macro.
Cependant, il y a des doublons

par exemple l'équipe qui avait au départ "3" en colonne T
à la fin de la macro il y a 3 lignes avec "3" en colonne T
je souhaiterais qu'à la fin de la macro il y ait une ligne avec 1 en colonne T , une ligne avec 2 en colonne T et une ligne avec 1 en colonne T

en gros on passerait de Nombre d'équipes à N° d'équipe
mais peut-être serait ce plus simple d'ajouter une colonne et ajouter ce n° d'équipe ???

qu'en penses tu ?

merci
Deps
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re,

La colonne étant nommée Nombre maxi, j'ai considéré que cette colonne comprenait le nombre d'équipes désiré. L'identification des équipes se retrouve donc en colonne V.

Si une mauvaise manip se produit (par exemple pour 3 équipes, effacement par mégarde de la ligne numéroté 3 en colonne T), alors on est incapable de retrouver le besoin initial (c'est à dire trois équipes). Il serait sans doute mieux de mettre le rang de l'équipe dans une colonne spécifique en colonne U (Equipe N°). L'identification des équipes se retrouve en colonne W.

edit: changer v1 pour v2 (voir message #7 )
 

Pièces jointes

  • deps-macro_nombre- v2a.xlsm
    19.4 KB · Affichages: 25
Dernière édition:

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonjour deps,

VB:
source.RemoveDuplicates Columns:=Array(3, 20), Header:=xlYes

Cette instruction correspond au menu "Données / Supprimer les doublons"

Pour la zone Source, on supprime toutes les lignes en double
avec comme critères de doublons les colonnes 3 et 20 de Source
et Source contient une ligne d'en-têtes.

Comme Source contient les colonnes de A à W, la colonne 3 est la colonne C et la colonne 20 est la colonne T. Ce qui ne doit pas être le cas (grossière erreur d'étourderie entre la version v1 et v2 suite à l'ajout d'une colonne dans la v2)

Tu viens donc de révéler (avec tact) une grave erreur sur la v2. Les doublons doivent se faire sur la colonne C 'Code AS' et sur la colonne V 'Inscription'; donc sur les colonnes 3 et 22 de Source (et non pas 3 et 20).

Je mets sur ce message et sur celui de la v2, la version corrigée v2a.

Bien vu deps ! ;)







 

Pièces jointes

  • deps-macro_nombre- v2a.xlsm
    19.4 KB · Affichages: 35
Dernière édition:

deps

XLDnaute Junior
Bonjour mapomme

j'ai supprimé quelques colonnes et j'ai transposé les lettres des colonnes d'origines vers les colonnes finales
Mais forcément j'ai du oublié quelque chose car maintenant lors du 1er clic sur le bouton, ça fonctionne mais lors du 2e clic les doublons apparaissent.

si tu arrives à voir mon erreur...je te remercie encore

bonne journée
Deps
 

Pièces jointes

  • deps-macro_nombre- v2a-modifie.xlsm
    19.9 KB · Affichages: 29

Discussions similaires

Réponses
3
Affichages
332

Membres actuellement en ligne

Statistiques des forums

Discussions
312 871
Messages
2 093 102
Membres
105 627
dernier inscrit
jean-marc.brillant