Forums XLPages

Tous les messages (myDearFriend!)

« 1 ... 139 140 141 142 143 144 145 ... 149 »
Re: Gestion Artt
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 26-09-2007 21h20
Bonsoir Ghandra,

Il n'est pas question d'abuser ou pas ici, le forum est fait pour poser des questions

Cela dit, sauf erreur, le présent sujet est résolu, je te remercie de créer un nouveau sujet pour cette nouvelle question.
Et comme on s'éloigne visiblement d'une question "débutant", merci de le faire dans le forum principal Excel.

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: Copie de Sous-totaux
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 26-09-2007 20h06
Bonsoir tout le monde,

Bravo Tibo !
Je connaissais le Ctrl+T (dont j'ai oublié de parler ), mais pas le raccourci par la touche F5.

Très bien
Merci à toi.

Et merci à oxor pour son retour d'info.

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: Copie de Sous-totaux
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 26-09-2007 00h11
Bonsoir oxor, le Forum,

Je ne suis pas un grand adepte de Données / Sous-Totaux...

Mais je vois 2 solutions possibles :

  • - En maintenant la touche Ctrl, tu sélectionnes une à une les celules (ou lignes) souhaitées
    - Puis, tu fais ton Copier / Coller normalement.
  • Ou bien
  • - Tu fais menu Edition / Atteindre / Cellules / Cellules visibles seulement
    - Puis, tu fais ton Copier / Coller normalement.


  • Cordialement,

    EDITION : Salut Salim, pardon je ne t'avais pas vu venir...
    Cela dit, on dirait qu'on n'a pas interprété la même chose pour le problème de l'ami oxor.

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: Gestion Artt
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 24-09-2007 23h27
    Bonsoir Ghandra, JeanMarie, JCGL,

    Tout d'abord, merci à JeanMarie pour les formules à intégrer dans le classeur. J'ai appliqué ces modifications à la lettre dans le classeur ci-joint.
    Cela dit, dans cette pièce jointe, j'apporte ma propre contribution concernant le problème des MFC supérieures à 3 conditions.

    J'ai donc inclus ma macro MFCmultiples un peu remaniée pour l'occasion. Un code un tantinet simplifié par rapport à la version d'origine (me débarrassant du même coup de l'instruction Application.EnableEvents qui ne m'a jamais vraiment satisfait car trop sensible). J'en ai profité également pour réduire l'interface de l'onglet MFC à une seule colonne au lieu de 2. Cette 2ème colonne n'apportait finalement rien de plus.
    Tout ça pour répondre à JCGL quant au pourquoi cette macro n'était pas encore en téléchargement sur ce site : tout simplement car elle n'était pas suffisamment optimisée à mon goût, et que je compte bien l'améliorer encore avant d'en faire une véritable version v3, qui sera bien sûr en téléchargement ici et fera certainement l'objet d'un article explicatif.

    J'ajoute que j'ai dû apporter une ligne de code supplémentaire spécifiquement pour le présent classeur. La macro d'origine ne pouvait pas gérer telle quelle l'alternance des lignes Grises et Blanches dans les onglets...

    Pour ton info Ghandra, le principe est simple :
  • Il te faut définir les valeurs et formats associés dans l'onglet MFC (modifier l'existant, en rajouter, en supprimer ou accepter ce que j'ai déjà mis)
  • Il te faut ensuite définir un format conditionnel "spécial" dans les cellules à gérer (voir dans la pièce jointe), format unique qui remplacera les 3 conditions que tu avais définies à l'origine
  • C'est tout ce que tu as à faire. L'unique procédure VBA présente dans le module de code de l'objet ThisWorkbook va gérer tout ça automatiquement (tu peux masquer l'onglet MFC si tu le souhaites, ça ne gênera pas la macro).
    Par ailleurs, si tu veux optimiser un peu ton classeur, tu peux nommer la liste des valeurs de l'onglet MFC et t'en servir pour alimenter tes listes de validation (en remplacement de la zone nommée "choix"). Comme ça, tu fais d'une pierre, deux coups !

    Espérant t'avoir aidé...

    Cordialement,
    Pièce jointe:
    zip mDF_gestion artt 08.zip   [ Taille: 29.19 Ko - Téléchargements: 675 ]

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: Suite Doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 24-09-2007 19h04
    Bonjour jc, le Forum,

    Effectivement, j'ai tourné autour de ton classeur un moment avant d'attaquer la phase de code car d'une apparence simple, les cas peuvent vite devenir tordus.

    Tu trouveras ci-joint l'exemple rectifié qui, en supprimant le décalage des triplettes, supprime du même coup le bug que tu as parfaitement analysé.
    J'en ai profité pour revoir un peu le code et pour tenter de trouver une alternative aux situations bloquantes rencontrées parfois et que l'aléatoire empêche de maîtriser pleinement (c'est le propre de l'aléatoire ). Je pense avoir réduit encore un peu les possibilités de tirages bloquants, mais ce n'est pas parfait! Sache que tu rencontreras encore quelquefois des tirages de départ t'amenant droit vers un blocage calcul... Dans ce cas, interrompre la procédure par Echap et relancer le tirage.

    Si la modification te satisfait, merci de revenir m'en informer et d'ajouter le préfixe "Résolu" à ton post.

    Cordialement,
    Pièce jointe:
    zip mDF ESSAI DOUBLONS 2.zip   [ Taille: 22.54 Ko - Téléchargements: 644 ]

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: Suite Doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 24-09-2007 02h12
    Bonsoir jc, le Forum,

    Eh bien, pas très simple le cas en effet...

    Bon, plutôt que d'essayer de "greffer" des morceaux de code qui, mis bout à bout, conduisent plus directement à l'usine à gaz qu'à autre chose... J'ai préférer faire un RAZ de tout ça et revoir la démarche autrement.

    Tu trouveras ci-joint ton exemple (le fichier simplifié de départ --> voir l'autre fil), dans lequel il convient de saisir en A32 le nombre total de participants inscrits, puis de cliquer sur le bouton "Répartir" pour obtenir ce qui devrait répondre à ton problème. Je n'ai pas fait "dans la dentelle", le problème restant très complexe. J'ai toutefois essayé de commenter le code au maximum pour t'aider un peu à comprendre la procédure appliquée.
    Il est possible que tu rencontres parfois des situations (normalement rares) où le calcul semble carrément bloqué ! Dans ce cas, faire Echap et relancer la procédure en cliquant à nouveau sur le bouton "Répartir".

    L'ensemble des contraintes exposées sont prises en compte à l'exception d'une seule : vérifier qu'un participant ne joue pas plusieurs fois en triplette.
    J'ai dû baisser les armes sur ce point faute de temps et aussi parce que je pense que le contrôle de cette contrainte supplémentaire consommerait beaucoup trop de ressources calcul pour une résultat plus qu'aléatoire...

    J'espère que la solution proposée te conviendra car c'est tout ce que je pourrai faire sur ce cas je pense.

    Cordialement,
    Pièce jointe:
    zip mDF ESSAI DOUBLONS.zip   [ Taille: 21.72 Ko - Téléchargements: 659 ]

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: recherche de doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 22-09-2007 00h12
    Bonjour jc, le Forum,

    Merci de ton retour. Je me permets de préfixer ce fil à "Résolu".

    Je te remercie également de ta proposition concernant tes applications de jeux de pétanque. J'ai un ami qui organise de temps en temps des concours de pétanque pour le comité d'entreprise de sa boite, peut-être que ça pourrait l'intéresser (si tu le permets).
    Je te laisse mon adresse mail par messagerie privée.

    Cordialement,

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: recherche de doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 20-09-2007 21h32
    Bonjour jc, le Forum,

    Je te propose la solution suivante qui devrait, je pense, respecter l'ensemble des contraintes exposées plus haut :
    Option Explicit

    Sub mDFtraitement
    ()
    'myDearFriend! - www.mdf-xlpages.com
    Dim DB As New Collection
    Dim Cel As Range
    Dim Cle As String, Chaine As String
    Dim LigneDuo As Integer
    Dim Partie As Byte, NJ As Byte, Jeu As Byte, Duo As Byte
        '
    Nombre de jeux par partie
        NJ 
    Application.Max(Range("A1:IV6").Value\ 4
        On Error 
    GoTo Doublon
        
    For Partie 1 To 5
            
    For Jeu 1 To NJ
                
    For Duo 1 To 4
                    Set Cel 
    Cells(Choose(Duo0244) + (Partie 1) * 6Jeu 1)
                    If 
    Val(Cel.Value) <> 0 Then
                        LigneDuo 
    Choose(Duo11, -2, -1)
                        
    Cle Format(Application.Min(Cel.ValueCel.Offset(LigneDuo0).Value), "00") & Format(Application.Max(Cel.ValueCel.Offset(LigneDuo0).Value), "00")
                        
    DB.Add CStr(Partie) & CStr(Jeu), Cle
                    End 
    If
                
    Next Duo
            Next Jeu
        Next Partie
        On Error 
    GoTo 0
        
    Exit Sub
    Doublon
    :
        If 
    Err.Number 457 Then
            Chaine 
    "Le 'Duo'  " Left(Cle2) & " - " Right(Cle2) & "  est en doublon :" _
                    vbLf 
    "Partie " Left(DB(Cle), 1) & " - Jeu " Mid(DB(Cle), 2) & _
                    vbLf 
    "Partie " CStr(Partie) & " - Jeu " CStr(Jeu)
            
    MsgBox Chaine
            Err
    .Clear
        End 
    If
        
    Resume Next
    End Sub

    Tu trouveras ci-joint le classeur mettant en oeuvre cette procédure.

    J'espère avoir pu t'aider...

    Cordialement,
    Pièce jointe:
    zip ESSAI DOUBLONS.zip   [ Taille: 11.57 Ko - Téléchargements: 729 ]

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: recherche de doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 19-09-2007 21h40
    Re jc,

    Le problème est effectivement tordu mais le challenge intéressant

    Une précision encore toutefois :
    Citation :
    Le tirage des triplettes se fait toutes les trois colonnes fixes se qui permet de mieux visualiser les tirages car il faut éviter justement qu'un joueur rejoue en triplette deux fois.

    Dans l'exemple que tu as joint, ces triplettes apparaissent non pas toutes les 3 mais toutes les 4 colonnes, est-ce une erreur ? J'imagine que oui, car si je prends l'exemple d'un concours avec 39 inscrits, il n'y aurait plus de place pour la 3ème triplette...

    Dans l'attente...

    Cordialement,

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    Re: recherche de doublons
    Webmestre

    Inscription: 18/05/2006
    De Saône-et-Loire (71)

    Messages: 1539

    Système d'exploitation:
    PC
    Version Excel utilisée:
    97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
    Posté le : 19-09-2007 09h36
    Bonjour JC, JCGL,

    OK, cela éclaircit déjà un peu le problème.
    Cela dit, as-tu essayé la modification de ligne comme je l'ai indiqué plus haut ?

    Il reste encore des "inconnues" à expliquer :
  • Si j'ai bien compris, un JEU se joue donc avec 4 joueurs, soit 2 équipes de 2. Le nombre de JEUX par partie découle du total des joueurs divisé par 4. Seul le nombre de partie est fixe (5). Peux-tu confirmer ?
  • Qu'en est-il des "triplés" comme par exemple 29-8-3 qu'on retrouve en E4:E6 ? Je suppose que le 3ème représente le reliquat du total de joueur divisé par 4. Ce reliquat est ensuite réparti "en plus". Mais cette répartition se fait-elle au hasard aussi ? La question est d'importance puisqu'on recontre cette situation uniquement sur les JEUX 4 et 8 de chaque partie dans l'exemple... Comment se décide quel JEU sera impacté par cette répartition là ? Par ailleurs, le numéro 36 ressort 2 fois comme 3ème élément. Est-ce voulu ?
  • Le traitement doit-il considéré ces "triplés" comme plusieurs groupes de 2, soit les couples 29-8, 29-3 et 8-3 pour la recherche des doublons ?

  • Tu vois, la chose n'est pas très simple vue de l'extérieur et des éclaircicements sont nécessaires...

    Cordialement,

    Didier_mDF
    Image redimensionnée
    Le Webmaster

    La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
    Hors Ligne
    Rapport   Haut 

    « 1 ... 139 140 141 142 143 144 145 ... 149 »