Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Un bouton permettant de verrouiller une ligne ?

  • Initiateur de la discussion Initiateur de la discussion keurma
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

keurma

XLDnaute Occasionnel
Bonjour,

Sous EXCEL comment inclure un bouton de validation en fin de ligne permettant de verrouiller cette ligne ?

Ci joint mon document EXCEL. Il faudrait que le bouton se trouve sous la case VALIDATION.

http://cjoint.com/?kymf3tN7mH

Merci pour votre aide
 
Re : Un bouton permettant de verrouiller une ligne ?

.....mais en fait il aurait fallu que je puisse travailler sur les lignes sans avoir a chaque fois la demande de mot de passe. Ce serait le fait de cliquer sur le bouton ok qui verrouillerait la ligne et qui a ce moment là obligerait a remettre le mot de passe si on voulait modifier une cellule.
 
Re : Un bouton permettant de verrouiller une ligne ?

Bonjour le forum
keurma le code de wilfried_42 fonctionne comme tu l'a demandé si dans la colonne F il y a OK la ligne est verrouillée si tu donne le mot de passe et que tu enlèves le OK la toute la ligne est déverrouillée jusqu'au moment ou tu remet OK en F

Amicalement
Dominique
 
Dernière édition:
Re : Un bouton permettant de verrouiller une ligne ?

Bonjour,

Est il possible de savoir comment vous avez fait pour mettre en place ce type de verrouillage?

Car je ne suis pas tres doué, mais j'aime bien savoir comment ça marche pour pouvoir y arrivé tout seul 😛

Merci par avance,

Vince
 
Re : Un bouton permettant de verrouiller une ligne ?

Bonjour


Il faut aller voir le code VBA présent dans la feuille nommée Feuil2.
(Fais un clic-droit sur son onglet et choisis Visualiser le code)
Tu y trouveras ces macros
Code:
Private Sub Worksheet_Activate()
    Set cel = ActiveCell
End Sub
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If UCase(Range("F" & Target.Row)) = "OK" Then
       If InputBox("Mot de passe") = "CMOI" Then Exit Sub
        MsgBox "loupé"
        cel.Select
        Exit Sub
    End If
    Set cel = Target
End Sub

Post scriptum: ces macros sont dans le fichier posté par Wilfried_42.
 
Dernière édition:
Re : Un bouton permettant de verrouiller une ligne ?

merci beaucoup 😀 pour l'explication.

Parcontre je me retrouve avec une erreur d execution 424 : objet requis.... quand je mets annuler au mot de passe et ensuite ok au popup et ensuite on peut quand même modifier les infos..... :C
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
182
  • Question Question
Microsoft 365 bouton supprimer
Réponses
4
Affichages
228
Réponses
7
Affichages
697
  • Question Question
Microsoft 365 Tableau
Réponses
5
Affichages
288
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…