Couleur si condition(s)
Fermé
cl3m_78
Messages postés
2
Date d'inscription
mercredi 3 février 2016
Statut
Membre
Dernière intervention
4 février 2016
-
Modifié par cl3m_78 le 3/02/2016 à 15:00
patty5046 Messages postés 43 Date d'inscription lundi 8 février 2016 Statut Membre Dernière intervention 24 mai 2020 - 8 févr. 2016 à 17:46
patty5046 Messages postés 43 Date d'inscription lundi 8 février 2016 Statut Membre Dernière intervention 24 mai 2020 - 8 févr. 2016 à 17:46
A voir également:
- Couleur si condition(s)
- Excel condition couleur - Guide
- Somme si couleur - Guide
- Excel cellule couleur si condition texte - Forum Excel
- Nb si couleur ✓ - Forum Excel
- Iphone 14 couleur - Guide
7 réponses
cl3m_78
Messages postés
2
Date d'inscription
mercredi 3 février 2016
Statut
Membre
Dernière intervention
4 février 2016
4 févr. 2016 à 13:58
4 févr. 2016 à 13:58
Merci pour ta réponse,
Néanmoins, même en ne mettant que Active.Cell, il m'ouvre la fenetre de débogage (erreur d'execution '424', object requis", avec en jaune la ligne avec If..... :/
Néanmoins, même en ne mettant que Active.Cell, il m'ouvre la fenetre de débogage (erreur d'execution '424', object requis", avec en jaune la ligne avec If..... :/
Frenchie83
Messages postés
2239
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
28 janvier 2023
335
6 févr. 2016 à 09:01
6 févr. 2016 à 09:01
Bonjour
Si vous disposez d'excel 2007 ou plus, pourquoi ne pas utiliser le format conditionnel?
-Sélectionnez le tableau de données
-dans le ruban - Accueil - Mise en forme conditionnelle - Règles de mises en surbrillance des cellules - Valeurs en double - Ok
Cdlt
Si vous disposez d'excel 2007 ou plus, pourquoi ne pas utiliser le format conditionnel?
-Sélectionnez le tableau de données
-dans le ruban - Accueil - Mise en forme conditionnelle - Règles de mises en surbrillance des cellules - Valeurs en double - Ok
Cdlt
Bonjour,
Merci pour ta réponse,
Le problème c'est que le fichier que je pilote est censer être ouvert par différentes personnes. Aussi, le fait de juste mettre une couleur n'empêche en rien la saisie d'une date et d'un horaire déjà présent dans la liste.
Avec une macro VBA, et une msgbox, l'utilisateur est obliger d'avoir pris connaissance que le créneau qu'il a choisit est déjà pris.
voilà pourquoi j'ai privilégié l'utilisation d'une macro.
Merci pour ta réponse,
Le problème c'est que le fichier que je pilote est censer être ouvert par différentes personnes. Aussi, le fait de juste mettre une couleur n'empêche en rien la saisie d'une date et d'un horaire déjà présent dans la liste.
Avec une macro VBA, et une msgbox, l'utilisateur est obliger d'avoir pris connaissance que le créneau qu'il a choisit est déjà pris.
voilà pourquoi j'ai privilégié l'utilisation d'une macro.
Whismeril
Messages postés
18279
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
17 mars 2023
888
8 févr. 2016 à 15:59
8 févr. 2016 à 15:59
Bonjour, tu peux associer la mise en forme conditionnelle, avec une macro qui protègerait les cellules remplies.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
patty5046
Messages postés
43
Date d'inscription
lundi 8 février 2016
Statut
Membre
Dernière intervention
24 mai 2020
5
8 févr. 2016 à 17:46
8 févr. 2016 à 17:46
Bonsoir
Je galère sur votre problème et ne comprends pas trop votre histoire de couleur et de suppression...Retraitée, il faut me pardonner
Supposons que l'utilisateur frappe en A et en B 2 valeurs identiques qui existent déjà dans le tableau
Quand il se trouve en B, il faudrait pouvoir lancer ce style de macro qui lui indiquerait à quel endroit elles se trouvent :
J'espère que cela aide un peu.
Bon courage
Je galère sur votre problème et ne comprends pas trop votre histoire de couleur et de suppression...Retraitée, il faut me pardonner
Supposons que l'utilisateur frappe en A et en B 2 valeurs identiques qui existent déjà dans le tableau
Quand il se trouve en B, il faudrait pouvoir lancer ce style de macro qui lui indiquerait à quel endroit elles se trouvent :
Sub CherchDoublon()
Dim Rg As Range
Set Rg = Range("B1:B" & Range("B65536").End(xlUp).Row)
ValCherch = ActiveCell.Value
With Rg
Set Trouve = .Find(What:=ValCherch, LookIn:=xlValues, LookAt:=xlWhole, _
SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False)
'Si Find a trouve
If Not Trouve Is Nothing Then
Adr = Trouve.Address
MsgBox "Valeur existante en " & Adr
Set Trouve = .FindNext(Trouve)
End If
End With
End Sub
J'espère que cela aide un peu.
Bon courage
Bonjour
Cela pourrait-il t'aider??
Le 8 car je n'avais que 8 lignes dans mon test
Bon courage
Cela pourrait-il t'aider??
Sub test()
For i = 1 To 8
Range("A" & i).Select
If Activement.Value = Range("B" & i).Value Then
MsgBox Range("B" & i).Value
With Selection.Interior
.Color = 255
End With
MsgBox " attention"
End If
Next
End Sub
Le 8 car je n'avais que 8 lignes dans mon test
Bon courage