Tout d'abord merci a Hypo78 et CHALET53 pour leur solution de mon dernier post.
Voila ma question du soir, pouvons-nous interdir la saisie d'une cellule après une première saisie. Je m'explique, dans une feuille "A" déjà protégée je souhaite saisir des valeur dans certaine cellule (bien entendue non protégée) mais qu'à la sortie de cette cellule je ne puisse pas resaisir une autre valeur ?? ( Pas de droit à l'erreur en somme)
Merci pour vos contribution et du temps que vous passez à nous aider.
Oui, et quelques informations complémentaires nous permettront de vous le démontrer :
- Un fichier représentatif en exemple, avec les données d'entrée, les contraintes et le résultat escompté;
- Votre préférence pour les macros ou pas.
Re : Rendre la saisie d'une cellule impossible après la première saisie ?
Salut
et ainSi... ?
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target = "" Then Exit Sub
Application.EnableEvents = False
Target(1, 2).Select
Application.EnableEvents = True
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([A1:A11], Target) Is Nothing And Target.Count = 1 Then
If Target <> "" Then
ActiveSheet.Unprotect
Target.Locked = True
ActiveSheet.Protect
End If
End If
End Sub
Merci pour cette solution elle me convient mieux que les autres quoique tout aussi efficace cela me semble plus simple pour la saisie Mais ne voudreiz-vous pas m'aider à la mettre en place je ne sais pas du tout comment faire
En effet une petit démo est souvent bien plus simple. Voici donc un classeur modèle avec sur la feuille"cahier" les cellules à protéger après saisie sont les cellules des colonnes "U" à "BR"
Bonjour
ci joint ton fichier
je l'ai enregistré en XLM ( penser à activer les macros)
pour comprendre :
Clic de droit sur l'onglet (en bas de l'écran) et sélectionner visualiser le code.
C'est géré par une macro événementielle qui se déclenche dès qu'une cellule est modifiée dans la plage U1:BR1000 et qui la verrouille si celle ci est documentée.
tu peux toujours les modifier en mode manuel en enlevant la protection de ta feuille.
Cela est très simple à l'utilisation mais quand on regarde le code c'est plus complexe, sans toi je n'aurai jamais su le faire. Toutefois j'ai encore un petit soucis, quand les colonnes de la feuille "cahier" ne sont pas remplie dans mon BL j'ai la valeur "#VALEUR!" quand j'utilise la formule =si(_____=0;"";______) et si je ne l'utilise pas j'obtiens "0" je voudrai faire disparaitre le "0"
SI tu veux bien encore m'aider une fois et mon projet sera parfait encore un grand merci pour ce que tu as fait.