Impression de formulaire avec criteres
Bonsoir à tous les amis du forum
Dans mon projet de base de données, je souhaite imprimer directement un formulaire avec quelques éléments de la base (identité - sexe). Pour imprimer toutes les fiches sans sélection, cela fonctionne très bien mais je souhaite améliorer le système.
Je me heurte au problème suivant.
Dans la base, le champ sexe se trouve en colonne D et le niveau en colonne G.
Je souhaiterai pouvoir dans ma macro filtrer les éléments de la base pour pouvoir imprimer deux séries l'une après l'autre (mais dans une seule macro, de manière automatique) en fonction de 2 critères :
- 1ère série : sélectionner les débutants (niveau) de sexe féminin en plaçant l'identité du stagiaire en B18 et le sexe en C12
- 2ème série : sélectionner les débutants (niveau) de sexe masculin en plaçant l'identité du stagiaire en B18 et le sexe en H12
Je ne doute pas que les nombreux excelliens du forum pourront me donner la solution.
Merci par avance.
Bonjour Banzai64
Merci pour ce coup de main qui me permet d'avancer dans mon projet.
La procédure fonctionne impeccablement.
Si j'ai bien compris dans ta procédure, c'est la ligne suivante qui permet d'inscrire dans les bonnes cellules le sexe de la personne :
For I = 0 To UBound(Genres)
.Cells(12, 3 + (I * 5)) = Genres(I)
Et cette ligne doit remplacer la boucle que j'avais dans mon code.
For Ligne = 2 To xlDon.Range("D" & Rows.Count).End(xlUp).Row
Encore merci et bonne journée.
Bien cordialement
Bonjour
jeanlouispaf a écrit :.Cells(12, 3 + (I * 5)) = Genres(I)
Avec cette ligne on inscrit d'abord "F" puis on parcourt tout les noms (For Ligne = 2 To ....) pour n'envoyer à l'impression que les "Débutant" et les "F"
Ensuite on fait la même chose pour les "H"
3 + (I * 5) permet de trouver la bonne colonne pour y inscrire "F" ou "H"