Mot de passe bloque sur une macro

Résolu/Fermé
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018 - 14 févr. 2018 à 11:04
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018 - 14 févr. 2018 à 21:14
Bonjour le Forum,

Je petit soucis avec un mot de passe qui rentre en conflit avec une macro, pourriez vous me dire pourquoi,

voici la macro :

Public WithEvents GrLabel As Msforms.Label
Private Sub GrLabel_Click()
If ActiveCell.Column > 22 Then Exit Sub

Selection.Interior.Color = GrLabel.BackColor
Selection.Font.Color = GrLabel.ForeColor
Selection.Value = GrLabel.Caption

End Sub

Par avance merci pour vos idées.

Bien à vous et o forum.




A voir également:

7 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 févr. 2018 à 11:40
Bonjour,

« Je petit soucis avec un mot de passe qui rentre en conflit avec une macro »
Quel est le souci ?
0
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
14 févr. 2018 à 11:52
Quand j'appuie sur le bouton pour ouvrir ma userform et que je clique sur une cellule pour incorporer une donnée, ça me beug au niveau de

Selection.Interior.Color = GrLabel.BackColor et j'ai une barre jaune qui recouvre cette ligne
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 févr. 2018 à 12:45
Et il y a un message, que dit-il ?
0
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394
14 févr. 2018 à 12:46
Bonjour
si votre feuille est protègée, (avec ou sans mot de passe) avez vous bien coché l'option "format de cellule" dans la liste des autorisations qui s'affiche lors de protection?
crdlmnt
0
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
14 févr. 2018 à 13:23
Bonjour Vaucluse,

Je viens de faire ce que vous m'avez écris mais rien ni fait, c'est sur,

Selection.Interior.Color = GrLabel.BackColor
Selection.Font.Color = GrLabel.ForeColor
Selection.Value = GrLabel.Caption

que ça beug, je ne sais pas pourquoi.

Bien à vous.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 févr. 2018 à 13:44
Quel est le message d'erreur ?
0
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
14 févr. 2018 à 15:35
Le message d'erreur est:

Erreur d'exécution '1004':
Erreur définie par l'application ou par l'objet
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
14 févr. 2018 à 18:52
Avec ça, comment sais-tu que c'est un « petit soucis avec un mot de passe »
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
14 févr. 2018 à 19:06
Je pense que pour vous, qui connaissez si bien excel et les macros, ça peut être un petit soucis mais pour moi c'est l'incompréhension, je ne vois pas pourquoi ça bloque
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
Modifié le 14 févr. 2018 à 20:01
Ça répond pas à ma question : comment sais-tu que c'est le mot de passe qui te pose le souci ?
0
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
14 févr. 2018 à 20:29
Quand je veux mettre un mot de passe pour bloquer des cellules ou je ne veux pas qu'interviennent des personnes mal intentionnées, pour enlever les formules de calcul, hé ben là ça beug, quand j'enleve la protection, ça re-fonctionne
0
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394
14 févr. 2018 à 20:57
Alors peut être simplement

en début de macro:

activesheet.unprotect "mot de passe"

et en fin de macro avant end sub:

activesheet.protect "mot de passe"

et bien sur protéger VBA avec mot de passe si vous ne voulez pas que le mot de passe soit visible dans la lecture de la macro

crdlmnt
0
narvalot Messages postés 117 Date d'inscription lundi 5 septembre 2011 Statut Membre Dernière intervention 24 septembre 2018
Modifié le 14 févr. 2018 à 21:25
Je vous remercie de la patience que vous avez eu à mon égard, cela fonctionne du tonnerre et bien sûr j'ai mis un mot de passe pour que la macro ne soit pas visible par des mains invisibles qui me nuise.

Encore mille merci de votre aide et merci à ce fabuleux Fôrum.

Je voudrais mettre en résolu mais je ne sais plus comment faire, excusez moi encore d'abusez de votre aide.

Bien à vous.

narvalot
0