[ Resolu par Job75 Merci ] Faire ressortir les doublons de deux classement et..???

[Guido]

Bonsoir le Forum

Bon vœux a Toutes, Tous.

Dans le fichier ci dessous j'ai des plages avec 2 sélections, et j'aimerais faires ressortir les six premiers

de chaque plages avec leurs valeurs,et ensuite faire ressortir les doublons .

Ces doublons seront classé selon la valeurs totales des deux sélections,

Un texte en VBA serait l'idéal pour chaque Pages et les max 9 tableaux...de cette même page

je ferais le bouton de la macro.

Merci d'avance

Guido

 

[Guido]

Bonjour

Je poste le fichier avec la premiere plage faite selon ma demande

Merci d'avance

a plus

Guido

 

[job75]

Bonjour Guido, le forum,

Voyez le fichier joint et la fonction VBA Bingo.

Edit : la création du Dictionary prend du temps, pour accélérer il est mémorisé en haut de Module1.

La durée du recalcul des 7 feuilles est de 0,07 seconde alors que sans cette précaution elle serait de 0,47 seconde.

A+

 

[job75]

Re,

Dans ce fichier (2) les 3 tableaux des résultats sont côte à côte.

Les fonctions TriHorizontalCouleur et Bingo ont été légèrement modifiées (transposition).

Bonne soirée.

 

[Guido]

Re

Bonsoir Job75 et le forum

Avec une réponse... tout est OK ,Merci Job75

Petite question...Svp

J'aimerais bien adapter sur le fichier de l'avant dernier post ,une macros qui ferais la même choses que

tu as fais pour le fichier ci dessus. Merci Job75

Donc je me permet de te demander le code VBA pour adapter avec un bouton...dans les onglet feuil 1.2.3.4.5.6.7.

A plus

Amitiés

Guido

 

[Guido]

Re Job75

mon petit mot c'est croisé merci

pour le fichier.

a très vite Guido

 

[job75]

Re,

Une discussion => une seule question, relisez la Charte du forum Guido.

Pour en finir avec celle-ci on aura peut-être remarqué que quand il y a des doublons de points dans le 3ème tableau "BINGO" ceux-ci ne sont pas toujours dans l'ordre du 1er tableau.

Voir dans le fichier (2) les courses R2C6 - R3C4 - R3C7.

Pour y remédier il suffit d'ajouter un 2ème Dictionary (dd) qui repère les lignes du 1er tableau.

Fichier (3), curieusement le recalcul des 7 feuilles est un peu plus rapide : 0,06 seconde.

Bonne fin de soirée.

 

[Guido]

Bonjour Job75 et le forum

Re

Petite question...Svp

J'ai essayé de copier les colonnes AA-.AO dans le fichier ci dessous, depuis le fichier Sélection et Classement finaux vers le fichier

Prono 2017 ..............

Mais je n'ai pas réussis...les plages AA5;AO25 contiennent le mot NOM...

Donc je me permet de te demander le code VBA pour adapter avec un bouton...dans les onglet feuil 1.2.3.4.5.6.7.

Merci pour ton aide précieuse.

A plus

Amitiés

Guido

 

[job75]

Bonjour Guido, le forum,

Le jour où vous saurez faire quelque chose par vous-même les poules auront des dents, hein Guido ?

J'ai simplement mis dans ce dernier fichier les 3 fonctions du fichier (3) de mon post #7.

Et j'ai aussi ajouté dans Module1 la macro Transfert de ce fil :

https://www.excel-downloads.com/thr...e-un-classement.20013569/page-3#post-20103955

Bonne journée.

 

[Guido]

Re

Bonjour Job75

Je te remercie pour la finalisation du Fichier Prono 2017_32.....

C'est SUPER Job75.je peux finir et commencer les Stats.

Je vais faire les Mises a Jour et,Hop c'est parti.

Pour 6 mois d'observations journalière.

Bonne fin de journée

Merci Job75

Guido

 

[Guido]

Re

TOUT est OK

Merci Job75

Guido

 

[job75]

Bonjour Guido, le forum,

Pour peaufiner (et aussi pour le fun) voyez ce fichier (2) et cette macro dans ThisWorkbook :

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
If Target.Count = 1 Then Target.CurrentArray.Select 'sélectionne toute la zone matricielle
End Sub

Quand on est sur "Feuil1" sélectionner une cellule comme AA6 AC6 AE6, la zone matricielle entière est sélectionnée.

A+

 

[Guido]

Bonjour Job75

Merci pour cette petite astuce.

J'ai un petit soucis dans la page menu .je dois kliké deux sur le boutons 3° soit Transfert Trios / Overs / Bingos

pour avoir le remplissage complet des pronos qui se trouvent dans les feuilles1.2.3.4.5.6.7. AK2:AN28...ainsi de suite

Ou dois je ajouté une nouvelle phrase dans le VBA .Merci d'avance,

A plus

Guido

 

[job75]

Re,

La macro Copie_TransferDesTrios n'est pas de moi mais du dénommé "Grand Galop" (Planète Turf).

Contactez l'auteur (il aurait mieux valu s'en rendre compte lors de la création).

A+

 

[Guido]

Re,

La macro Copie_TransferDesTrios n'est pas de moi mais du dénommé "Grand Galop" (Planète Turf).

Contactez l'auteur (il aurait mieux valu s'en rendre compte lors de la création).

A+

Re Job75

Oui,c'est ce j'ai fait ,mais GG a en ce moment des problèmes de santé.

donc je profite pour lui souhaité un prompt rétablissement

si ,tu ne sais pas ,je continuerais a kliké 2 fois de suite sur le fameux boutons

Merci

Amitiés

Guido