Validation de données, même si la feuille est verrouillée?

Signaler
Messages postés
36
Date d'inscription
vendredi 23 mai 2008
Statut
Membre
Dernière intervention
31 mars 2013
-
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
Bonjour à tous,

Je suis en trainde créer un fichier excel pour une utilisation pro. Chaque onglet sera donc verouillé. Mais, chaque personne pourra sélectionner son prénom pour utiliser le fichier, en fonction de son service. Pour chaque service sélectionné, je charge dans une liste (via validation des données) les prénoms du dit service (service BE / SAV / commercial, etc...) Quand les onglet sont déverrouillé, tout fonctionne bien, mais quand je verrouille l'ensemble, j'ai une belle fenêtre d'erreur.

Mon code actuel et celui-ci

If Feuil1.Range("G3").Value = "TECHNIQUE / M.E.S." Then
With Range("G1").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=Nom_TMES"
.IgnoreBlank = True
End With
End If

Comment puis-je autoriser ce code, malgré que la feuille est verrouillé? Vous avez une idée?
Merci.
ThomasF

2 réponses

Messages postés
172
Date d'inscription
jeudi 8 décembre 2011
Statut
Membre
Dernière intervention
21 juillet 2013
2
Bonjour !

Si tu as bien pisté l'erreur et qu'elle ne provient que du fait de la protection de la feuille,
dans ce cas déprotège la feuille en début de code puis re-protège là en fin de code :
    Feuil1.Unprotect
    
    ' code
    
    Feuil1.Protect

___________________________________________________________________________________________________________________
Comme la vitesse de la lumière est supérieure à celle du son, certains ont l'air brillant avant d'avoir l'air con !
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
ça ressemble a une usine à gaz...


"selectionner son prénom"...
pourquoi ne pas le faire en automatique, via le nom/prenom récupérés sur l'AD, ou au pire l'UserName ?

si ce qui te gène est la msgbox d'erreur, on peut s'en arranger (displayalerts = false, ou quelque chose de ce gout)

ce code est il indispensable ?
quel est son but ?
pourquoi verrouiller l'onglet concerné ?


Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp