Microsoft 365 Macro mise en forme conditionnelle

_Thierry

XLDnaute Barbatruc

Repose en paix

• 21 Juillet 2020

• #2

Bonsoir @Coralie01120 , le Forum

Ah toujours avec ce projet je vois !!

Pour la mise en forme conditionelle, ce qui est certain c'est qu'elle ne peut pas faire ceci :

Coralie01120 à dit:

De plus, si ma colonne B est bleue alors la coche en C s'enlève.

Cliquez pour agrandir...

Ca c'est impossible, une mise en forme conditionelle n'écrira ou n'effacera jamais rien dans les cellules...

Bonne soirée
@+Thierry

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 21 Juillet 2020

• #3

re
bonsoir

J'aimerai que lorsque je met une coche ("X" ou "x") en colonne C alors la cellule B se mette en vert.
De plus, si ma colonne B est bleue alors la coche en C s'enlève.

Cliquez pour agrandir...

relis toi

???????????????????????
edit:
merci a thierry qui a pris la peine de mettre le doigt dessus

 

Vote positif 0 Vote négatif

C

Coralie01120

XLDnaute Occasionnel

• 21 Juillet 2020

• #4

Bonsoir,

Et oui toujours avec ce projet : j’essaye de simplifier au max...
Je cherche justement à résoudre le problème avec du VBA mais je galère un peu.

@patricktoulon je n’ai pas compris. Ça semble compliqué à comprendre mais j’ai mis un fichier pour aider à la compréhension...

Bonne soirée,

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 21 Juillet 2020

• #5

Hello Coralie, Patrick

Je pense avoir "décodé" LoL ... Voir ci-joint...

Bonne nuit
@+Thierry

 

Pièces jointes

• XLD_Coralie01120_Macro_EventSheet_FakeConditionalFormat_v00.xlsm

  15.4 KB · Affichages: 19

Vote positif 0 Vote négatif

Solution

C

Coralie01120

XLDnaute Occasionnel

• 23 Juillet 2020

• #6

Bonjour,

Super ! C'est exactement ce que je cherchais.

Bonne journée,

 

Vote positif 0 Vote négatif

C

Coralie01120

XLDnaute Occasionnel

• 23 Juillet 2020

• #7

Bonjour Thierry,

Je viens de voir que si je met un X dans la colonne C face à une cellule en B bleu alors le X s'enlève.

Je m'explique : si la colonne B a une cellule en bleu c'est le signal que je dois agir. Une fois que c'est fait je met un X et la cellule devient verte (action réalisée).

Comme mon fichier évolue il est possible que la même cellule bleue devenue verte redevienne bleue et là le X s'enlève.

Il n'est pas possible de faire ces deux actions à la fois ?? Avec deux boutons cela ne fonctionnerait pas ?

Merci pour votre aide et votre temps.

Cordialement,

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 23 Juillet 2020

• #8

Bonjour @Coralie01120 , le Fil, le Forum

Ce n'est pas un bouton mais un évenement sur la feuille.

VB:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column <> 3 Then Exit Sub

If UCase(Target.Value) = "X" Then
    If Target.Offset(0, -1).Interior.Color = 15773696 Then
        Target = ""
    Else
        Target.Offset(0, -1).Interior.Color = 5296274
    End If

Else
    If Not Target.Offset(0, -1).Interior.Color = 15773696 Then
        Target.Offset(0, -1).Interior.Color = xlNone
    End If

End If

End Sub

Si tu ne veux plus que ca s'éfface, tu mets en commentaire Target = ""
Ou tu lui fais écrire ce que tu veux Target = "Attention"

Bonne Journée
@+Thierry

 

Vote positif 0 Vote négatif