un autre nettoyage macro

[kllmoon]

Bonjour le forum,

Ce serait sympa si quelqu'un pourrait regarder mes codes et faire un nettoyage. Ce qui m'irrite le plus, c'est lorsque la feuille dossier actifs est sélectionnée, cliquez la et vous verrez!

Je vous laisse le lien, c'est un téléchargement direct avec tout ce que vous avez besoin pour faire fonctionner le classeur

XTHost.info download page

Merci d'avance à vous tous!! Bonne journée.

 

[kllmoon]

Re : un autre nettoyage macro

En passant, l'option copier tableau et créer mot de passe ne sera pas utilisable puisqu'elle est codée pour les ordinateurs ayant un nom de réseau.

 

[soenda]

Re : un autre nettoyage macro

Bonsoir le fil, Kilmoon

Et le mot de passe pour avoir accès au code, que l'on doit nettoyer...

A plus

 

[kllmoon]

Re : un autre nettoyage macro

oops désolé j'avais oublié que j'avais protégé la version finale!! Le mot de passe est Asterix01

 

[Compte Supprimé 979]

Re : un autre nettoyage macro

Salut Kllmoon,

Une vrai usine à gaz ton fichier

1) j'ai supprimé tous les modules vides

2) regroupé les procédures de tri dans un seul module, renommer correctement.

3) Mis en commentaire la ligne

'Sheets("Exemple").Range("A194").Value = ("Rouge")

Dans la procédure "Private Sub Worksheet_Activate()"
de ta feuille "Dossier Actifs"

Car une fois que tu es passé par cette feuille et après le message,
tu ne peux plus accéder aux feuilles "Nom", "Chambre" et "Date"
C'est peut-etre ce que tu souhaites !?

4) Pour Appeler une sub dans un projet il n'est absolument pas utile de le faire par Application.Run

Application.Run "'statssocial-MAJ-2009-02-04.xls'!trierrnom"
Application.Run "'statssocial-MAJ-2009-02-04.xls'!Module11.trierchambre"
Application.Run "'statssocial-MAJ-2009-02-04.xls'!trierdate"

Car si tu change sle nom de ton fichier, ça ne fonctionne plus
Mieux vaut mettre :

Call TrierNom
Call TrierChambres
Call TrierDate

Nota : le Call n'est pas nécessaire, c'est pour une lecture plus facile

Tu trouveras ton fichier modifié ICI

A+

 

[kllmoon]

Re : un autre nettoyage macro

Je te remercie Bruno, je vais regarder le code pour en tirer un apprentissage. Les feuilles noms, chambre et date sont bloquées volontairement, petit codage que je trouve ingénieux de ma part considérant que je suis un débutant

Bonne journée et encore merci!