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

Microsoft 365 Aide pour un code Vba

NONO14

XLDnaute Occasionnel
Bonjour à tous,
Ce code a pour effet d'interdire la saisie dans une cellule déjà remplie. Toutefois, pourriez-vous me dire comment interrompre ce processus lorsque je veux intervenir sur une cellule suite à une erreur de saisie, ce qui n'est pas possible à moins de déverrouiller les macros. J'avais pensé à un bouton qui donnerai l'accès suite à un mot de passe, mais je ne sais pas comment faire.
Pourriez-vous m'apporter votre aide s'il vous plait ?
Je vous en remercie par avance
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target <> "" Then Cells(1, 1).Select
End Sub
 

TooFatBoy

XLDnaute Barbatruc
C'est pour qu'on ne voit pas le pw à l'écran de loin par-dessus ton épaule !
Vois-tu mieux l'intérêt de la chose ???

Bon, tu vas le dire qu'on voit déjà le pw écrit sur le Post-it collé sur le bord de ton moniteur...
 

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD
Bonjour,
Du coup il serait peut-être plus simple de passer par une UserForm avec une TextBox où là il est plus simple de masquer les caractères saisis.

Oui plus simple, dans les propriétés du textbox tu as ça



Un truc que je m'étais amusé il y à longtemps

Utilisateur "nico"
Mot de passe "2001"

 

Pièces jointes

  • Classeur1.xlsm
    20 KB · Affichages: 0

Discussions similaires

Réponses
14
Affichages
221
Réponses
10
Affichages
592
Réponses
20
Affichages
542
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…