Discussion :

[chrisg95]

Bonjour à tous,

j'ai crée un planning "presque' automatisé pour des techniciens, j'ai encore du boulot...
je suis à court d'idée, j'ai mis en place des macros, des règles mais la je sèche. Ce planning est une usine a gaz.
Avez vous des idées pour que ce soit plus simple?

Il me manque une VBA qui permette : à partir du formulaire de remplir les cellules les 3 rdv matin et les 2 rdv en après midi pour chaque équipe.

Une VBA qui permette d'imprimer une dossier entier qui est sur une ligne (jusque la, j'ai fait un copier des cellules + impression des onglets.

Beaucoup de transfert de données.......................

n'hésitez pas à me dire si il est possible de faire bien mieux et surtout plus fonctionnel que ce que j ai fait,

planning-2023-v3.xlsm

[BENNASR]

Bonjour
pour faire bouger cette discussion tu peux remplacer cette longue formule en colonne c
soit :

=SI(Q343="CONFLANS STE HONORINE";"CFS";SI(Q343="ANDRESY";"AND";SI(Q343="CHANTELOUP LES VIGNES";"CHP";SI(Q343="LES ALLUETS LE ROI";"ALL";SI(Q343="AUBERGENVILLE";"AUB";SI(Q343="MORAINVILLIERS";"MOR";SI(Q343="ORGEVAL";"ORG";SI(Q343="TESSANCOURT SUR AUBETTE";"TES";SI(Q343="CARRIERES SOUS POISSY";"CAR";SI(Q343="LA FALAISE";"FAL";SI(Q343="AULNAY SUR MAULDRE";"AUL";SI(Q343="NEZEL";"NEZ";SI(Q343="Juziers";"JUZ";SI(Q343="VAUX SUR SEINE";"VAU";SI(Q343="NESLES LA VALLEE";"NES";SI(Q343="BUTRY SUR OISE";"BUT";SI(Q343="VALMONDOIS";"VAL";SI(Q343="LABBEVILLE";"LAB";SI(Q343="PARMAIN";"PAR";SI(Q343="ACHERES";"ACH";SI(Q343="ARGENTEUIL";"ARG";SI(Q343="BOIS D'ARCY";"BDA";SI(Q343="JOUY EN JOSAS";"JOU";SI(Q343="BIEVRES";"BIE";SI(Q343="LA CELLE SAINT CLOUD";"CEL";"")))))))))))))))))))))))))

tu insère un tableau nommé "commune" de deux colonne à savoir commune et ABV
dans la première colonne tu mais toutes les communes et dans la deuxième colonne tu mets les abréviation
puis dans la colonne c tu remplace ton formule par index et equiv

SIERREUR(INDEX(commune[[#Tout];[ABV]];EQUIV('Prise RV'!Q343;commune[[#Tout];[Commune]];0));"")

le planning à mon modeste avis est inutile et illisible; pense à un simple tableau croisé dynamique

[Franc]

Bonjour, je rejoins BENNASR, sa formule est plus simple et plus performante.
Je ne comprends pas très bien tes autres demandes, que veux-tu faire exactement avec le contenu de ton formulaire ?
Imprimer un dossier qui est sur une ligne ???
Ta macro d'impression fonctionne parfaitement mais elle peut être optimisée.
Je ne comprends pas ce que tu fais exactement avec ta macro copie, tu sélectionne une cellule, puis une ligne, puis tu te déplaces, puis tu reviens sur une feuille ??? Tu peux expliquer ce que tu veux faire ?
Ton code contient beaucoup de select et activate, bien souvent inutiles, tu peux affecter des valeurs et manipuler des données sans les utiliser, ton code sera plus lisible et performant.