Bloquer automatiquement des cellules apres avoir fait une saisie

Résolu
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour le FORUM


je souhaite savoir si c'est possible de bloquer automatiquement des cellules après avoir saisie une valeur. si possible de mettre un message "ex: confirmez-vous c'est valeur?".

je souhaite vraiment cibler les cellules, car le reste doit rester bloquer et inaccessible.

Merci beaucoup de votre aide.

Ci-joint un model de mes formulaire: https://www.cjoint.com/?DKynfii46b8


A voir également:

12 réponses

Réponse 1 / 12
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour,

Pourrais tu nous expliquer un peu plus en détail ce que tu souhaites faire ?
Car ton fichier.. ne suffit pas à lui tout seul...



je souhaite vraiment cibler les cellules, car le reste doit rester bloquer et inaccessible.

Déjà.. sous Excel.. tu as un mode "protection" qui permet de choisir les cellules qui peuvent être éditées ou non..

https://support.microsoft.com/fr-fr/help/973079


Ensuite, par Macro.. tu peux intercepter la/les cellule(s) modifiée(s) sur une feuille et faire un traitement spécifique de ton choix comme faire apparaitre un message..

Ca se gère avec la méthode : Worksheet_Change
Target correspond à la cellule modifiée... 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 6 And Target.Row = 14 Then
 MsgBox "vous avez modifié la cellule F14 ! La nouvelle valeur est: " & Target.Value
End If

End Sub

0
Réponse 2 / 12
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Si c'est pour le fichier de votre precedent message (https://forums.commentcamarche.net/forum/affich-31063403-copier-effacer-et-coller-a-la-suite c'est faisable, mais il faudra proteger la feuille avec un mot de passe et le code VBA avec le meme ou un different. Erreur 0 pour les operateurs !!!!!!!
0
Réponse 3 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour f894009, le forum

Non cela concerne pas le copier, coller effacer, pour sa c'est le top! et encore Merci....

Par contre je souhaite mettre en place une VBA dans un autre fichier, qui me permet de saisir des valeurs dans les cellules, puis les bloquer automatiquement après avoir fait entrer ou changer de cellule.

Merci d'avance
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Tu as regardé ce que je t'ai donné ?
Qu'as tu essayé ?
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour jordane45,

je vous laisse la primeur

mimi13580: suivez jordane45
0
Réponse 4 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour jordane45

J'ai essayer ton code, mais c'est pas ce que je recherche,

1-je veux sélectionner une cellule exemple F14
2- remplir cette cellule exemple 35,
3-Bloquer cette cellule automatiquement une fois que je fais entrer ou je que change de cellule,

c'est pour cela que j'ai mis un model.

Merci d'avance pour votre aide:)
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour,

J'ai essayer ton code, mais c'est pas ce que je recherche,

Non ça je le sais... mais je ne donne pas le code tout fait .. j'aiguille sur les possibilités ....
Je suis partisan du : "Je donne des pistes ... mais je ne fournipas du tout cuit....(ou alors que très très très rarement...)"

@f894009
Mais si jordane45 ne répond pas d'ici 16h, alors je vous ferai ça.

Si tu as le temps et la possibilité de le lui faire.. n'hésites pas.
A l'origine je suis modérateur/contributeur sur le site codes-sources ... et notre phyosophie semble ne pas être tout à fait la même qu'ici... où vous fournissez à la demande des codes "prêts à l'emploie" aux demandeurs... alors que nous.. (avant de leur donner le travail tout fait...) ne faisons que les aider à trouver par eux mêmes...
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

notre phyosophie semble ne pas être tout à fait la même qu'ici Normalement c'est la meme, mais de temps en temps je fais du "prêts à l'emploie"
quand je m'apercoit que les demandeurs galerent vraiment


Ok, je fais
bye
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour 894009,

Puis-je avoir ton code pour essayer???

protéger la feuille avec un mot de passe et le code VBA avec le même ou un diffèrent. Erreur 0 pour les operateurs !!!!!!!
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

code pas fait pour le moment. Mais si jordane45 ne repond pas d'ici 16h, alors je vous ferai ca.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

fichier modifie, mot de passe mimi protection feuille et code VBA

https://www.cjoint.com/?DKzqnkmk8JJ
0
Réponse 6 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonsoir f894009

Merci beaucoup pour ton aide, franchement rien à dire, bon, rapide et efficace....
BRAVO A TOI.

Et encore 1000 merci :)
0
Réponse 7 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour f894009, bonjour le forum,

j'ai une question concernant ton code, sur le formulaire j'ai fait plusieurs copier coller à la suite j'ai donc 3 page, j'aimerais savoir si je doit marquer tous les cellules? ou y à un code à donner?

Voici un exemple, merci d'avance.

https://www.cjoint.com/?0KDqne1qnBl
0
Réponse 8 / 12
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Heureusement que ce n'etait pas le meme fichier que dans un post precedent!!!!!!!!!!!! 

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("F14:H16,F19:H19,F22:H27," & _
                                                                     "F64:H66,F69:H69,F72:H77," & _
                                                                     "F114:H116,F119:H119,F122:H127")) Is Nothing Then
        retval = MsgBox("Confirmez-vous cette valeur?", vbYesNo, "VALIDATION SAISIE")
        If retval = vbYes Then
            Target.Locked = True
        End If
    End If
End Sub
0
Réponse 9 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour à toi et merci de ta rapidité et de ton efficacité :)

Une question: cela et-il possible d'effacer le contenu lorsqu'on répond au message par "non"?
0
Réponse 10 / 12
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re, 

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("F14:H16,F19:H19,F22:H27," & _
                                                                     "F64:H66,F69:H69,F72:H77," & _
                                                                     "F114:H116,F119:H119,F122:H127")) Is Nothing Then
        retval = MsgBox("Confirmez-vous cette valeur?", vbYesNo, "VALIDATION SAISIE")
        If retval = vbYes Then
            Target.Locked = True
        Else
            Application.EnableEvents = False
            Target = ""
        End If
    End If
    Application.EnableEvents = True
End Sub
0
Réponse 11 / 12
mimi13580 Messages postés 72 Date d'inscription   Statut Membre Dernière intervention  
 
Wawwww trop fort,
merci beaucoup

je pense que j'aurai encore besoin de votre aide, et-il possible de parler en privé?
Si non c'est pas grave, car je veux pas vous perdre dans le FORUM
-1
Réponse 12 / 12
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

passez par les MP et je vous donnerai une adresse @mail
-1

Discussions similaires

Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses
[Excel 2010] Remplir cellule d'après contenu d'une autre
nlbmoi -
amelie -

8 réponses