tri particulier Fermé

Question

bonjour voila mon probleme sous excel 2013 comment extraire des données et leur doublon en les conservant. Je m'explique
je met une bague a un oiseau avec un n° qui est unique ex: 3525908dans une colonne et B dans une autre
je recapture cet oiseau n° bague3525908 a la place du B je met C (contrôle) je peux recapturer cet oiseau plusieur fois
comment extraire ces données 
B	FRP	3525908
C	FRP	3525908
C	FRP	3525908
 base de 10 000 oiseaux
en sachant que je suis débutant en plus d'ignard

@nnie · Answer

Bonjour, 

Dans ce tableau, il n'y a pas de dates ? Pour le baguage et ensuite pour les contrôles ?

f894009 · Answer

Bonjour,

il vous faudrait adapter ce fichier (auteur: Michel_M de CCM): 

https://www.cjoint.com/c/EBeiqV7Vuj6

ccm81 · Answer

Bonjour

Peux tu envoyer une petite partie de ton fichier au format excel 2003 sur cjoint.com et joindre le lien obtenu à ton prochain message. N'oublies pas d'y ajouter des explications et des exemples de ce que tu veux obtenir

Cdlmnt

otuscops1 · Answer

merci des réponses je vais envoyer une partie du fichier mais il y a plus 50 champs. si j'y arrive

otuscops1 · Answer

J'espère que ça marche merci a bientôt



https://www.cjoint.com/?0BeqJtfRSs3

ccm81 · Answer

OK pour le fichier

mais que veux tu faire exactement
Exemple avec ce que j'ai compris
Je donne un numéro de bague 3525908
Je veux obtenir un extrait constitué de toutes les lignes avec toutes/pastoutes les colonnes - éventuellement sur une autre feuille - qui correspondent à cette bague en colonne R?

Autre chose?

otuscops1 · Answer

le nombre de colonnne importe peu
en fait c'est toutes les lignes de bagues B et leur C correspondantes que je veux extraire

ccm81 · Answer

Bon

Je crois qu'un filtre simple peut faire l'affaire
https://www.cjoint.com/?3BesnUU6CO6 

Cdlmnt

otuscops1 · Answer

je suis desole mais je crois que je n'ai pas su me faire comprendre je vais mettre en couleur les lignes que je veux extraire peu être plus facile a voir je reourne le fichier

otuscops1 · Answer

les couleurs sont les lignes a extraire ça sur 10300 lignes je ne sais pas si c'est possible a faire
 en fait c'est la bague et ses contrôles eventuels qui m'interesse, toutes les bagues n'on pas forcement un contrôle


https://www.cjoint.com/c/EBesJTrr6p7

ccm81 · Answer

1. en fait c'est la bague
laquelle, sur ton exemple il y en a 3 (3525908-3525909-3525912)
comment la choisis tu
2. et ses contrôles éventuels qui m'intéressent
c'est quoi les contrôles?

otuscops1 · Answer

ce n'est qu'une partie du fichier c'est juste pour montrer ce que je veux extraire 
le n° de bague est unique par oiseau au momment de la 1ere capture B par la suite cet oiseau peu être recapturer donc contrôler C une ou plusieur fois voir par un autre bagueur 
ce qui est interessant c'est de pouvoir avoir une lecture direct de ces oiseaux contrôlés
les données sont triées par n° de bague donc le contrôle apparait avec le baguage mais extraire ligne par ligne est trop fastidueux d'ou l'interet de pouvoir isoler tous ces oiseaux contrôlés avec leur donnée de baguage correspondante c'est pourquoi la 1ere ligne correspond au baguage et la ou les suivantes a son ou ses contrôle

ccm81 · Answer

Donc, si je comprends bien (pas sûr)
Tu veux supprimer (ou simplement masquer toutes les lignes) où il y a un B en colonne O non suivi d'un C (et garder toutes les lignes où il y a un C)

C'est ça?

ccm81 · Answer

Si oui, une petite macro 
https://www.cjoint.com/?3BeuItxRg5U 

Cdlmnt

otuscops1 · Answer

c'est difficile de ce faire comprendre par mail.
j'admire votre patience
je veux pouvoir extraire la donnée de baguageB et ses contrôlesC ensemble et ça dans tout le fichier

otuscops1 · Answer

surtout je ne veux rien suprimer

ccm81 · Answer

Et ce n'est pas ce que fait la macro?
As tu essayé Ctrl+m pour n'afficher que les bagues B suivies de C
il ne reste bien que les lignes en couleur

otuscops1 · Answer

genial et comment je fais comment pour copier la macro vu ma grande ignorance de ces choses en tout bravo et merci

ccm81 · Answer

Bon, ça commence à aller mieux

Le code complet
modifier éventuellement le nom de la colonne Action - j'ai mis la lettre O comme dans ton exemple pour la valeur de la constante co

Option ExplicitConst co = "O"Public Sub MasqueLignesB()Dim li As Long, lifin As LongApplication.ScreenUpdating = Falselifin = Range(co & Rows.Count).End(xlUp).RowFor li = 1 To lifin  If Range(co & li).Value = "B" And Range(co & li + 1) <> "C" Then    Rows(li).Hidden = True  End IfNext liApplication.ScreenUpdating = TrueEnd SubPublic Sub RAZ()Dim lifin As Longlifin = Range(co & Rows.Count).End(xlUp).RowRows("1:" & lifin).Hidden = FalseEnd Sub

Dans ton fichier
1. Places toi dans la feuille à traiter
2. Alt-F11 pour accéder à l'éditeur vba
3. Coller le code ci dessus

Pour lancer les macros avec des raccourcis clavier
4. Retour à la feuille
5. Outils/Macros
6. Sélectionner la macro MasqueLigneB
Option/Ctrl+m
OK
7. Sélectionner la macro RAZ 
Option Ctrl+r
OK

C'est tout

Cdlmnt

otuscops1 · Answer

merci c'est un peu tard pour moi pour essayer ça je bosse de bonne heure en tout merci pour tout
bonne soirée
cordialement

Tri particulier

20 réponses

Discussions similaires