J’aimerai connaitre la meilleure solution pour créer un tableau en fonction d’un tableau de base selon certains critéres. J’ai mis toutes les infos dans le fichier sur la feuille 1. MerciTableau soumis au Dr Excel.xlsx (16,6 Ko)
Bonjour
A tester
La macro:
Sub Transfert()
'Déclaration des variables
Dim F1 As Range
Dim i As Integer
Dim j As Integer
Dim DernLigne As Long
'Affectation des variables
DernLigne = Feuil1.Range("A" & Rows.Count).End(xlUp).Row
Set F1 = Feuil1.Range("A3:A" & DernLigne)
j = 4
'Vidage des dernière données
Feuil2.Range("A3:D65000").Clear
'Copie les titres
Feuil1.Range(Cells(3, 1), Cells(3, 4)).Copy Feuil2.Cells(3, 1)
'Boucle
For i = 1 To F1.Rows.Count
If F1(i, 4).Value = "o" Then 'Si la cellule en colonne D contient "o"
F1.Range(Cells(i, 1), Cells(i, 4)).Copy Feuil2.Cells(j, 1) 'Copie la plage
j = j + 1
End If
Next i
End Sub
le classeur:
Tableau soumis au Dr Excel.xlsm (18,3 Ko)
Merci d’avoir été attentive à mon problème et de trouver la solution. je ne m’attendais pas à avoir une solution si rapide. Je pensais qu’une solution en formules Excel pouvait le régler. Cependant, se pose un autre problème, je n’y connais rien en procédure VBA et comment enregistrer la procédure, la sauvegarder et l’exécuter. Pouvez-vous me guider. Merci
Re,
Ce sera trop long à expliquer,
De plus je pense que ton exemple ne doit pas correspondre à la solution finale (emplacement cellules, etc)
Le mieux c’est de joindre le bon classeur
Donc voici le classeur en question.
Il s’agit de candidats à un concours de chant.
Je dois en fonction d’un symbole quelconque dans le colonne Admis, créer le même tableau pour chaque feuille, soit dans le même dossier, soit dans un autre dossier.
Seuls les lignes des candidats ayant un symbole quelconque dans la colonne Admis doivent-être recopiés.
Cette liste était de la sélection quart de finale vers la demi-finale. ensuite je dois faire le même travail de la demi-finale vers la finale du concours.
A moins de partir au départ avec une base de données Excel !!Feuille Jury - Sélection.xlsx (69,6 Ko)
Re,
Comme quoi, j’avais raison 
Alors:
-1) je vais déjà reprendre les zones d’impression des feuilles (cela évitera d’avoir comme pour la feuille des +29ans d’avoir deux entêtes qui perturbera la macro.
-2) Je rajoute une feuille ACCUEIL où se trouvera un bouton qui transférera les données des “Admis” dans un nouveau classeur nommé (1/4 finale) etc jusqu’à Finale
donc un classeur à chaque résultat de concours, le tout dans un même dossier
Voir si cela convient 
Merci génial comme idée
Re,
Voilà ce que j’ai monté
J’ai abandonné le principe des différents classeurs
A tester
Pas d’explications, les macros sont identiques à celle inscrites plus haut
les zones d’impression sont gérer automatiquement suivant le nombre de concurrent
Re,
Amélioration du classeur
Impossible de joindre le classeur ???
https://www.cjoint.com/doc/18_03/HCwfEd8Q8WT_Feuille-Jury---Sélection.xlsm
Bonsoir,
Voilà ce que je reçois. Cet un fichier nommé HCwfEd8Q8WT_Feuille-Jury—Selection.xlsm.crdownload impossible à lire avec Excel.
Je suis sous windows 10 et je ne sais comment faire!!
Au secourrrrrs:joy:
Re,
Ok, je vais voir ce qui M…
Merci pour ton devouement à la bonn cause mimimathy
Bonjour,
C’est incroyable, cela va au-delà de mes espérences.
J’imagine que cela vous a demandé beaucoup de travail.
Merci, merci et encore merci Mimimathy
Re,
Un petit peu de copier/coller,
Mais si le problème est résolu
Ne pas oublier de passer le post en RESOLU