Interdire d'utiliser certaines valeurs

C

Chanel

Guest

• 10 Août 2010

• #2

Re : Interdire d'utiliser certaines valeurs

C'est bien ce que je souhaites, mais je ne comprends pas pourquoi un seul des deux 8 est surligné en jaune? Puisque le 8 est une valeur interdite, les deux devraient être en jaune...

Et puis si tu peux m'expliquer comment tu as fait... 🙂

Merci en tout cas !

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 10 Août 2010

• #3

Re : Interdire d'utiliser certaines valeurs

Bonjour Coco 😉, Jean-Marcel, le fil, le forum

Tu peux utiliser le menu Données/Validation
avec ce critère par exemple


Dans ce cas, on peut saisir dans la cellule (ou plage de cellules) ou s'applique cette validation
que des chiffres de 0 à 9999

A toi d'adapter le critère plus précisément selon ton souhait.

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 10 Août 2010

• #4

Re : Interdire d'utiliser certaines valeurs

Bonjour à tous,

Variante en reprenant le code de Jean-Marcel et :

- en ajoutant le Dim puis le nouveau Sub
- en modifiant la ligne du Sub existant sous Msgbox + 1ligne supplémentaire....

il y a toujours le message mais au lieu de la couleur, on ne peut plus inscrire une valeur interdite. Si avant l'erreur, il n'y avait rien dans la cellule, on ne met rien ; s'il y avait une valeur autorisée, on la remet.

Code:

Dim Mem As Variant

Sub Worksheet_SelectionChange(ByVal Cible As Range)
Mem = Cible.Value
End Sub


Sub Worksheet_Change(ByVal Target As Range)
 Dim Cell As Range
 If Not Intersect([A1:A10], Target) Is Nothing And Target.Count = 1 Then
        With Sheets("ValeursInterdites")
            For Each Cell In .Range("A1:A" & .Range("A65536").End(xlUp).Row)
                If Target = Cell Then
                    MsgBox "Valeur interdite"
                    Target.Value = Mem
                    Target.Select
                End If
            Next
        End With
 End If
End Sub

Cordialement

 

Dernière édition: 10 Août 2010

Vote positif 0 Vote négatif

C

Chanel

Guest

• 10 Août 2010

• #5

Re : Interdire d'utiliser certaines valeurs

Merci à tous !

Jean-Marcel et Mécano41 : j'ai finalement utilisé le code de Mécano41, ca donne exactement ce que je veux, excepté une chose : une fenêtre "valeur interdite" apparait mais elle ne disparait plus ! Je clique sur OK ou sur la croix rouge et la fenêtre reste, je ne peux rien faire d'autre sur mon fichier !? Je ne comprends pas...

Staple1100 : j'ai déjà essayé d'utiliser la validation mais cela ne fonctionne pas car mes valeurs autorisées et interdites se ressemblent trop. Exemple : la valeur 31459 est autorisée, tandis que les valeurs 31458 et 31460 sont interdites :s

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 10 Août 2010

• #6

Re : Interdire d'utiliser certaines valeurs

Chanel à dit:

... excepté une chose : une fenêtre "valeur interdite" apparait mais elle ne disparait plus ! Je clique sur OK ou sur la croix rouge et la fenêtre reste, je ne peux rien faire d'autre sur mon fichier !? Je ne comprends pas...

Cliquez pour agrandir...

... moi non plus! A tout hasard, voici le fichier qui fonctionne chez moi. Je suis en EXCEL 2002 SP3...

Cordialement

 

Pièces jointes

• Valeurs Interdites.xls

  24.5 KB · Affichages: 108

Vote positif 0 Vote négatif

C

Chanel

Guest

• 10 Août 2010

• #7

Re : Interdire d'utiliser certaines valeurs

Je vous envoie mon fichier pour que vous puissiez voir, car le mien bug..

Ne vous étonnez pas, pour des raisons de confidentialité (c'est un fichier professionnel), je l'ai vidé !

Merci d'avance

 

Pièces jointes

• Copie de Classeur1.zip

  45.6 KB · Affichages: 63
• Copie de Classeur1.zip

  45.6 KB · Affichages: 46
• Copie de Classeur1.zip

  45.6 KB · Affichages: 54

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 10 Août 2010

• #8

Re : Interdire d'utiliser certaines valeurs

Re


Chez THALES, il ne plaisante avec la confidentialité alors 😉

(PS: c'est juste un trait d'humour )

PS2: le code de mecano41 fonctionne sans souci (Excel 2000)

 

Dernière édition: 10 Août 2010

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 10 Août 2010

• #9

Re : Interdire d'utiliser certaines valeurs

Aucun problème chez moi ...

 

Vote positif 0 Vote négatif

C

Chanel

Guest

• 10 Août 2010

• #10

Re : Interdire d'utiliser certaines valeurs

euh.... je suis perplexe...

Je n'ai rien touché de la macro, j'ai juste supprimé des colonnes pour réduire sa taille et pouvoir vous l'envoyer ! Avant ca ne marchait pas et là je viens de réessayer et effectivement il n'y a aucun souci ! 😱 Je ne comprends pas bien ce qui a bloqué avant mais ca marche maintenant donc tant mieux !

En tout cas merci à tous ! C'est un très bon forum, je reviendrai consulter je pense 😉

 

Vote positif 0 Vote négatif