XL 2016 Soucis Macro et Case a cocher

Wanou22

XLDnaute Nouveau
Bonsoir,

Je suis bloqué avec un fichier Excel sur lequel je voudrais une macro pour faire apparaitre la date dans la case de droite grâce a une case a cocher (400 cases par feuille), et que la date se verrouille, car pour le moment j'arrive a faire apparaitre la date avec une macro (chatgpt 🤣 ) mais si je revalide une case a cocher le lendemain ca m'actualise toute les dates déjà rajoutées.

Pourriez vous m'aider?
 
Solution
Bonjour @Wanou22

Je te propose ce fichier

J'ai renommé les TS avec un nom évocateur plutôt que Tableau12345 qui n'est pas parlant
Tout fonctionne sur simple clic comme dans la version 1
A noter qu'en supprimant ~3 600 cases à cocher ton fichier est passé de 2 850 ko à .... 111 Ko ;) o_O

Merci de ton retour

Phil69970

XLDnaute Barbatruc
Bonjour @Wanou22 et bienvenu sur XLD

Quelques remarques :

1) Quand je lis ceci :
400 cases par feuille

Je me dis que l'on est proche de l'usine à gaz et de l'erreur de conception !!!
Et combien de feuilles ?

2)
Pourriez vous m'aider?
Le forum est là pour cela mais j'ai pas vu ton fichier !
Et je suis nul en divination 🤣 🤣

3) As tu été voir en bas de la feuille !!!
1715646020905.png


Bonne lecture
 

Phil69970

XLDnaute Barbatruc
Bonjour @Wanou22

Remarques
1) Ta MFC sur la ligne 2 est bizarre à comparer avec la ligne 3
1715880467139.png


Je l'ai modifié pour l'ajuster avec les autres lignes

2) Attention aux espaces dans les entêtes de ton tableau structuré
1715880618531.png


Je l'ai laissé et j'ai fait le code VBA en conséquence donc si tu supprimes l'espace il faudra modifier le code ;)

3) J'ai viré toutes tes cases à cocher qui sont ingérables évidement !!! :oops:
9 feuilles * 400 cases à cocher ==> 3 600 cases à cocher 🤣🤣🤣🤣

4) J'ai fait une macro pour les virer toutes d'un bloc sinon bonne chance pour les supprimer une par une o_O
==> Module1 : SupShape

5) Le poids de ta feuille est maintenant 7 fois plus légère 169 ko à 24 ko !!!!

6) J'ai modifié les formules pour que tout fonctionne bien sur....

7) A chaque clic une croix se met/s’enlève dans la colonne des "noms" et la date du jour s'inscrit/s'efface à coté colonne des dates

Je te propose ce fichier

Merci de ton retour
 

Pièces jointes

  • Barre progession fausse case a cocher V1.xlsm
    24 KB · Affichages: 2

Wanou22

XLDnaute Nouveau
Bonsoir,

Merci pour la réponse rapide, c'est top pour les modifications =) Est ce qu'il serait possible que tu me fournisse la Macro avec les points a modifier en rouge afin que je l'applique sur toutes mes autres feuilles?

Merci
 

Phil69970

XLDnaute Barbatruc
@Wanou22

Le plus simple est que tu mettes le fichier sur le site .
Enregistre le fichier au format XLSB il devrait peut être passer et faire < 1 Mo

1715896280610.png


Si cela ne suffit pas enlèves la feuille que j'ai déjà faite.
Si c'est toujours pas suffisant poste le fichier complet sur un site tiers genre Cjoint et mets le lien ici.

 

Phil69970

XLDnaute Barbatruc
@Wanou22

C'est normal ceci dans la feuille "Tri"

1715937514857.png


Idem ceci avec une colonne en plus dans certaine feuille et pas dans d'autres !!

1715937674499.png


De même des entetes qui s'appelle "Colonne2" ou "Colonne222" c'est normal !!!!

Pour info le code fonctionne dans la feuille "Accroche que tu as fournis si tu rajoutes/supprimes des colonnes ma macro ne fonctionnera plus !!
Donc réfléchi bien sur ce que tu veux faire car après c'est trop tard !!!
 

Phil69970

XLDnaute Barbatruc
Bonjour @Wanou22

Je te propose ce fichier

J'ai renommé les TS avec un nom évocateur plutôt que Tableau12345 qui n'est pas parlant
Tout fonctionne sur simple clic comme dans la version 1
A noter qu'en supprimant ~3 600 cases à cocher ton fichier est passé de 2 850 ko à .... 111 Ko ;) o_O

Merci de ton retour
 

Pièces jointes

  • Barre progession fausse case a cocher V2.xlsm
    110.8 KB · Affichages: 7

Discussions similaires

Statistiques des forums

Discussions
313 264
Messages
2 096 657
Membres
106 701
dernier inscrit
KOFFI