Microsoft 365 Aide pour un code Vba

NONO14

XLDnaute Impliqué
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
356

Membres actuellement en ligne

Statistiques des forums

Discussions
315 087
Messages
2 116 084
Membres
112 655
dernier inscrit
fannycordi