XL 2013 Automatisme pour remplir des TABs

Dranreb

XLDnaute Barbatruc

• 7 Février 2019

• #46

J'ai écrit la procédure dans ThisWorlbook dont je parlais et revu en conséquence la programmation des macros des modules applicatifs, qui peuvent toutes s'attribuer à des boutons de formulaire. Attention: la TranfertY s'applique à la feuille active.

 

Pièces jointes

• GigogneSigmund173.xlsm

  303.6 KB · Affichages: 12

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 7 Février 2019

• #47

Euhhhh .... j'adore ... top top top
hihihihi par contre si je clique sur le titre Flag, il disparait, donc je peux pas filtrer dessus au cas ou on voudrait voir quelque chose ?

Après si on fait le bouton pour générer les TAB exclusion comme décrit avant pas besoin de filtrer

Chouette

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 7 Février 2019

• #48

je ne vois guère comment mettre en rouge les Deputy non transférés.

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 7 Février 2019

• #49

Oui, j'ai vu que la Workbook_SheetSelectionChange réagit à tort dans des zones hors des Flag, dont le titre.
J'ai résolut le problème en faisant ajoutant un nom "Flag" dans chaque feuille par la Dispatch.

 

Pièces jointes

• GigogneSigmund173.xlsm

  314.1 KB · Affichages: 17

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 8 Février 2019

• #50

C'est parfait, c'est exactement ce dont on a besoin ...
Pour le souci des deputy, j'ai mis ce qui pourrait nous convenir c'est à dire une TAB en plus que j'ai mis en bleu.
Et pour finir j'ai mis dans Summary le bouton ventilation et le nouveau bouton (vide) pour faire apparaitre les TAB exclusions que j'ai mis en violet

Donc pour expliquer, ces TAB n'existe pas au départ et quand on clic sur le bouton, toutes ces TAB sont crée avec la liste des membres dont la coche est mise suivant votre formule
C'est vraiment chouette

 

Pièces jointes

• GigogneSigmund173.xlsm

  347 KB · Affichages: 10

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 8 Février 2019

• #51

Bonjour.
Voilà.

 

Pièces jointes

• GigogneSigmund173.xlsm

  365.7 KB · Affichages: 13

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 18 Février 2019

• #52

Bonjour Dranreb,

désolé pour le retour aussi tardif, j'étais en vacances et pas d'accès internet.
Un grand merci pour ta patience et ton savoir, je viens de regarder le fichier et c'est vraiment bien, une grosse épine du pied qui s'en va 🙂
Par hasard une idée pour la création des TABs qui sont en violet ?
Merci par avance comme tjs 🙂

 

Pièces jointes

• GigogneSigmund173.xlsm

  348.1 KB · Affichages: 7

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 18 Février 2019

• #53

Bonjour
Une fois les coches mises dans la feuille concernée, exécutez la macro TransfertY.
Le plus simple c'est de l'affecter à un bouton de formulaire dans chaque feuille avec les coches à mettre.

 

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 18 Février 2019

• #54

Ok je regarde comment vous avez fait et je copie la même chose. La macro TransfertY va créer les TABs aussi du coup ?
Merci pour le support c'est vraiment sympa

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 18 Février 2019

• #55

Elle ne va remplir qu'une seule feuille cible: celle qui porte le même nom que la feuille source avec " Exclusion" concaténé au bout.

 

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 18 Février 2019

• #56

Ah ... hum, je vais essayé ... je suis en train de décortiquer le boulot fait jusqu'à maintenant et de comprendre le fonctionnement.
En excel je me debrouille sur les formules mais en marco je suis une bille ........ et c'est bien dommage car impressionnant ce qu'on peut faire avec ...

Déjà je suis content j'ai trouvé le module TransfertY 🙂 ... oui oui nous n'avons pas le même niveau

 

Dernière édition: 18 Février 2019

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 18 Février 2019

• #57

Bon je dois être "con" parce que ça marche pas ... grrrr, pourtant je ne fais que copier ce que vous avez fait :-( :'(

Quand j'assigne le module TransfertY à un bouton et que je clique dessus il me met, Run-time error '9', subscript out of range

 

Dernière édition: 18 Février 2019

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 18 Février 2019

• #58

Alors joignez ce que vous avez fait

 

Vote positif 0 Vote négatif

S

Sigmund173

XLDnaute Occasionnel

• 18 Février 2019

• #59

Voilà, j'ai assigné le TransfetY au bouton

 

Pièces jointes

• GigogneSigmund173.xlsm

  350.7 KB · Affichages: 9

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 18 Février 2019

• #60

Je ne vois aucune anomalie.
Dans "HR Exclusion" il y avait 3 lignes, dans "HR" il y en avait 4 de cochées, j'y ai exécuté TransfertY, en allant dans "HR Exclusion" j'y ai bien trouvé 4 lignes. Par contre je ne vois aucun bouton dans "HR" pour l'exécuter.
Attention: j'ai trouvé un bouton dans la feuille "Summary" auquel est affectée cette macro. Ça n'a pas de sens: il va essayer de mettre quelque chose dans une feuille "Summary Exclusion" qui n'existe pas.
Je vous avais pourtant dit au poste #46 :

Dranreb à dit:

Attention: la TranfertY s'applique à la feuille active.

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif