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
 

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

Capture d’écran 2024-08-28 155629.jpg


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

Utilisateur "nico"
Mot de passe "2001"

test form6.gif
 

Pièces jointes

  • Classeur1.xlsm
    20 KB · Affichages: 0

Discussions similaires

Réponses
14
Affichages
218
Réponses
10
Affichages
590
Réponses
20
Affichages
536

Statistiques des forums

Discussions
313 865
Messages
2 103 078
Membres
108 521
dernier inscrit
manouba