Liste de fin de Contrats du mois

[Lunique]

Bonjour la bonne équipe 😀


Dans cet exemple je travaille pour réaliser un tableau de bord servant à exécuter mes tâches courantes.
Avec votre aide, j'ai réussi à réaliser :
1- Macro "Tri " ;
2- Macro "Verrouillée" ;
3- Macro "déVerrouillée" avc Code ;
4- Formule de Calcul de Fin CDD,

il me reste par conséquent l'enregistrement d'une Macro pour le boton CDD en haut à gauche du Tableau de Bord,
elle sert à déterminer la liste d'agents en fin de CDD pour un mois donné,
Ex: Je clic sur le Btn CDD, une boite de dialogue me demande d'entrer:
- de: date à: date -
je clic sur OK de la boite de dialog
Resultat recherché:
Je devrai avoir une liste d'agent en fin de contrat de la date telle Ex: 31/12/2011 à date telle Ex: 31/01/2012

 

[jp14]

Re : Macro

Bonjour

Ci joint le fichier avec un exemple de gestion de mot de passe.
Il faut protéger les macros avec un mot de passe on trouve cet option dans le menu outils.

JP

 

[Odesta]

Re : Macro

Bonjour Lunique, jp14, le forum

Une solution intermédaire qui complete la solution de jp14 :

ActiveSheet.Protect Password:="aa", DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowInsertingColumns:=True, AllowInsertingRows:=True, AllowSorting:= _
        True, AllowFiltering:=True

Il faut ajouter manuellement "password:= " à la macro, car l'enregistreur n'en tient pas compte.


Cdt

Olivier

 

[Lunique]

Re : Macro

C'est gentil de votre part.... Merci infiniment pour votre contribution trop appréciée de ma part. Merci encore une fois

Bonjour

Ci joint le fichier avec un exemple de gestion de mot de passe.
Il faut protéger les macros avec un mot de passe on trouve cet option dans le menu outils.

JP

 

[Lunique]

Re : Macro

Merci Olivier C'est des vrais connaisseurs...vous êtes.

Bonjour Lunique, jp14, le forum

Une solution intermédaire qui complete la solution de jp14 :

ActiveSheet.Protect Password:="aa", DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowInsertingColumns:=True, AllowInsertingRows:=True, AllowSorting:= _
        True, AllowFiltering:=True

Il faut ajouter manuellement "password:= " à la macro, car l'enregistreur n'en tient pas compte.


Cdt

Olivier

 

[Staple1600]

Re : Macro

Bonjour

Lunique:
Sache tout de même que cette protection n'est qu'illusoire et facilement contournable.

 

[Lunique]

Re : Macro

Apprend moi à réaliser une protection plus efficace... Je vous serais reconnaissant.

Bonjour

Lunique:
Sache tout de même que cette protection n'est qu'illusoire et facilement contournable.

 

[Staple1600]

Re : Macro

Re


Elle n'existe pas vraiment sous Excel (sauf si l'utilisateur final est novice)

Fais une recherche sur le net à propos de la protection sous Excel pour comprendre pourquoi elle est illusoire.

Mais cette protection peut suffire dans le cadre d'une utilisation classique d'Excel par des utilisateurs qui ne chercheront pas à contourner la protection mise en place.