Copie et transfert de la valeur des cellules d'un tableau vers un autre tableau

Anonyme
2018-12-21T14:09:10+00:00

Bonjour,

J’ai transformé les grilles des pages « Concours » et « Finale » en tableau. Cela m’amène une plus grande souplesse d’utilisation. Maintenant, il me suffit de rentrer un numéro dans la cellule de la colonne « B » libre suivante, pour créer une ligne tout en gardant toute la programmation qui va avec. Exemple : dépassement des valeurs, le match nul interdit …

La ligne 5 contenant les titres des colonnes du tableau est masquée. Les colonnes « R, S, T, U et V » aussi sont aussi masquées.

Dans l’exemple, à l’issue des 3 parties, un classement a été effectué par l’intermédiaire du bouton « Classement ». Ensuite, les valeurs des cellules « B6 : C13 » sont transférées dans les cellules « J7 : K14 » de la feuille « Finale » par le bouton « Qualifié Finale ».

Il reste à copier le reste des équipes(N° et Equipes). La liste démarre à partir de la neuvième ligne du tableau (quatorzième ligne), ça c’est le point de départ qui ne change jamais, jusqu’à C « aléatoire ». Aujourd’hui, il y a 16 équipes, demain, il y aura peut-être 40 …et ça c’est la valeur inconnue.

Ma question est de savoir comment copier la valeur des cellules des colonnes « B et C » de la feuille « Concours » puis de les coller dans les cellules des colonnes « B et C » de la feuille « Repechage et trier la colonne « B » en ordre croissant.

Je pourrai faire manuellement un copier/coller et le transférer dans la feuille « Repechage » dans la cellule « B6 » et classer la colonne « B ».

Maintenant, est-ce qu’un code pourrait remplacer cette dernière action ?

Merci pour ton aide.

Cordialement

https://1drv.ms/x/s!Avq7hyE1Ux3Mkn61aCQQYrcJBX5h

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire

110 réponses

Trier par : Les plus anciens
  1. Anonyme
    2019-01-03T18:34:31+00:00

    bonjour,

    essaie avec celui là. Merci

    https://1drv.ms/x/s!Avq7hyE1Ux3MkxA40jHP6MdbPBj8

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  2. DanielCo 107.7K Points de réputation
    2019-01-04T10:54:55+00:00

    Bonjour,

    1. Ca ressemble à du code écrit par moi... Ce qui se produit, c'est que le numéro entré n'a pas de correspondance dans la plage B5:B54. Qu'est-ce que je dois faire dans ce cas ? Est-ce que je mets un msgbox et j'efface la cellule ?
    2. OK.

    Je te renvoie le classeur dès  que tu m'auras répondu pour le premier point.

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  3. Anonyme
    2019-01-04T13:10:43+00:00

    bonjour,

    je confirme que c'est bien ton code (1 an voire plus) . Avant, il y avait des lignes figées. Cela posait quelques problèmes. C'est pour ça que je suis passé en mode tableau.

    A la question, la réponse est oui. MsgBox, effacement de la cellule et on reste sur cette cellule tant que la valeur est erronée.

    Merci

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  4. DanielCo 107.7K Points de réputation
    2019-01-04T14:45:43+00:00

    Par contre, j'ai des problèmes avec la feuille Finale. Là, il y a du code qui n'est pas de moi. Apparemment, j'interfère avec le code déjà existant. Il y a une ligne qui est un total mystère pour moi :

    If 6 Then Exit Sub

    Est-ce que tu aurais une explication ?

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  5. Anonyme
    2019-01-04T15:16:33+00:00

    je suis désolé. Tu as raison. Ce "6" n'a rien à faire ici. Comment il y est venu ? je pense à mauvaise manipulation. Je suis allé voir une ancienne version. En fait, à la place du "6", il faut mettre "Flag" . Merci

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire