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

110 réponses

Trier par : Les plus anciens
Le plus utile Les plus récents Les plus anciens
  1. Anonyme
    2019-01-25T18:42:06+00:00

    bravo. C'est super. Merci beaucoup et bonne soirée.

    Patrick

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

    0 commentaires
  2. Anonyme
    2019-02-08T09:48:55+00:00

    Bonjour Daniel,

    Si tu le veux bien, j'ai encore besoin de tes lumières. En effet, après moult essais, je me suis aperçu que l'utilisation n'était pas pratique du tout. Quand tu as, dans l'onglet "Affichage", tout décoché et que tu as masqué automatiquement le ruban, on ne sait jamais si la feuille est protégée ou pas, d'où une certaine incohérence. Le but est de supprimer ces deux boutons.

    Cela concerne la feuille "Concours". J'ai modifié la première partie du code et ça fonctionne. J'ai mis une boîte de dialogues "Oui ou Non". En cliquant sur Oui, on déprotège la feuille et ainsi, on peut procéder aux inscriptions. Clic sur Non, j'ai utilisé un bout de ton code pour effacer le nombre en colonne B. Cette partie est OK.

    Là où ça coince, c'est la partie le code qui se trouve en deuxième position. L'idée est que quand on dit "Oui" sur la boîte de dialogue, on protège la feuille. J'ai essayé de faire quelque chose, mais…

    Une partie du code est :

    Dim demandeTirage As Variant

    If Not Intersect(Target, [D:D,G:G,J:J]) Is Nothing Then

    La suite est sur le code. Je l'ai mis sur un classeur vide et cela fonctionne. Quelque chose m'échappe.

    Il y a quelque chose qui serait super sympathique si tu as le temps. Ce que j'aimerai, c'est que pendant le mode inscription, avec la touche "Enter", de pouvoir "circuler", en partant :

    ·       B6  saisie valeur  Enter  direction C6   saisie valeur  Enter direction B7

    ·       saisie valeur  Enter  direction C7   saisie valeur  Enter direction B8

    ·       saisie valeur  Enter  direction C8   saisie valeur  Enter direction B9

    ·       etc…

     Merci pour ton aide.

    https://1drv.ms/x/s!Avq7hyE1Ux3MkyTzr883L-VwCDsy

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

    0 commentaires
  3. DanielCo 107.7K Points de réputation
    2019-02-08T12:14:04+00:00

    Bonjour,

    Là où ça coince, c'est la partie le code qui se trouve en deuxième position. L'idée est que quand on dit "Oui" sur la boîte de dialogue, on protège la feuille. J'ai essayé de faire quelque chose, mais…

    Qu'est-ce qui ne fonctionne pas ? J'ai testé et le code répond bien. Si je clique sur "Oui", la feuille est protégée et le code continue à s'exécuter. Si je répond "non", la macro s'arrête.

    Daniel

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

    0 commentaires
  4. Anonyme
    2019-02-08T12:52:54+00:00

    est-ce qui y aurait un paramètre extérieur qui pourrait poser problème ?

    Patrick

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

    0 commentaires
  5. Anonyme
    2019-02-08T13:03:40+00:00

    quand je clique dans la cellule, le message n'apparaît pas

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

    0 commentaires