IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Peut-on empêcher une macro d'être stoppée ?


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Femme Profil pro
    Comptable
    Inscrit en
    Novembre 2018
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Comptable

    Informations forums :
    Inscription : Novembre 2018
    Messages : 1
    Par défaut Peut-on empêcher une macro d'être stoppée ?
    Bonjour à vous,

    Je vous explique mon problème. J'ai crée un fichier Excel pour que les employés indiquent leurs heures travaillées et dans ce fichier, les heures de congé se calculent automatiquement. Afin d'éviter qu'un employé se rajoute par inadvertance des heures supplémentaires sur une période précédente et par le fait même, gonfle sa banque de temps, à chaque période de paye je verrouille les cellules. J'ai créer cette macro que j'ai associé à ALT+f afin de me faciliter la vie :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Sub Figer_les_heures()
     
        Dim resultat As Long
        Dim resultat1 As Long
        On Error Resume Next
        resultat = InputBox("Ligne débutant ?", "")
        resultat1 = InputBox("Ligne finissant ?", "")
       If Err <> 0 Then Exit Sub
        ActiveSheet.Unprotect Password:=Range("AI" & 1)
        Range("D" & resultat & ":T" & resultat1).Select
        Selection.Locked = True
        Range("W" & resultat1 + 3).Select
        ActiveSheet.Protect Password:=Range("AI" & 1), DrawingObjects:=True, Contents:=True, Scenarios:=True
    End Sub
    J'avais trouvé en passant dans le menu Outils/VBAProject - Propriétés du projet dans l'onglet protection comment protéger par mot de passe, mais j'ai aussi trouvé dans la même journée la façon de contourner le mot de passe, et un de mes collègues de travail aussi, donc inutile de protéger la macro.

    Comme vous le voyez, au lieu d'inscrire le mot de passe, je l'ai inclus dans une cellule que j'ai masquée mais le problème c'est que si on fait exécuter la macro "pas à pas détaillé" et qu'on la stop juste avant qu'elle remette la protection de la feuille, on peut aller voir le contenu de la cellule AI1.

    Je vous joins mon fichier afin de vous aider à comprendre ma problématique.Feuille de temps.xlsm

    Est-ce que quelqu'un aurait une idée ou une piste de solution?

    Un gros merci à l'avance!

  2. #2
    Membre Expert
    Inscrit en
    Septembre 2007
    Messages
    1 142
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 142
    Par défaut
    Bonsoir,

    Comme tu l'as vu toi même les protections offertes par un tableur sont facilement contournables,
    de la même manière que les clés que tu mets sur ta porte ne te garantissent pas de n'être pas cambriolé.

    Plutôt que de chercher à empêcher les modifications précédentes tu te fais une sauvegarde en lieu sûr
    et tu verras facilement si certains ont fait des modifications prohibées en comparant les classeurs.

    Si tu trouves une martingale imparable donnes nous la cela peut servir à d'autres ! ;-) ;-)

Discussions similaires

  1. Peut-on empêcher un fichier d'être copier-coller?
    Par Papoux dans le forum Windows
    Réponses: 2
    Dernier message: 28/01/2011, 13h57
  2. Réponses: 8
    Dernier message: 19/02/2010, 12h52
  3. Réponses: 3
    Dernier message: 23/10/2009, 18h25

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo