Macro pour écrire texte si cellule colorée

Y compris Power BI, Power Query et toute autre question en lien avec Excel
J
Jave
Jeune membre
Jeune membre
Messages : 22
Inscrit le : 7 décembre 2016
Version d'Excel : MAC 2016

Message par Jave » 9 août 2019, 00:29

Bonsoir

Je cherche une solution pour lorsque une cellule d'une colonne est vide , la cellule d'à cote se colore en rouge avec un texte .
Seul soucis , cette cellule avec le ne peut contenir une formule car je dois pouvoir y écrire autre chose.

Est ce possible avec une macro.

Mon exemple est joint

Merci pour l'aide

Ja
Macro texte et couleur.xlsx
(9.41 Kio) Téléchargé 6 fois
T
Theze
Passionné d'Excel
Passionné d'Excel
Messages : 3'675
Appréciations reçues : 264
Inscrit le : 26 janvier 2011
Version d'Excel : 2007

Message par Theze » 9 août 2019, 07:03

Bonjour,

A mettre dans le module de la feuille et supprimer la MFC :
Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Target.Column <> 3 Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    
    Application.EnableEvents = False
    
    If Target.Value = "" Then
    
        Target.Offset(, -1).Value = "A voir"
        Target.Offset(, -1).Interior.Color = 49407
        
    Else
    
        Target.Offset(, -1).Value = "OK"
        Target.Offset(, -1).Interior.Color = 16777215
    
    End If
    
    Application.EnableEvents = True
    
End Sub
Il vaut mieux un qui sait que cent qui cherchent :wink:

Ce forum étant un lieu de partage, je n'accepte pas les messages privés !
Avatar du membre
paritec
Passionné d'Excel
Passionné d'Excel
Messages : 3'864
Appréciations reçues : 389
Inscrit le : 7 juin 2011
Version d'Excel : W10 - 2003 FR - 2010 FR

Message par paritec » 9 août 2019, 07:35

Bonjour Jave These le forum
moi j'ai fait pour traiter le tableau complet !!
et surtout pour pouvoir écrire n'importe quoi dans la colonne B si la colonne C est remplie
a+
Papou :)
Macro texte et couleur V1.xlsm
(17.76 Kio) Téléchargé 5 fois
Des bonnes explications et des petits fichiers représentatifs vont nous aider à vous aider !!!!
J
Jave
Jeune membre
Jeune membre
Messages : 22
Inscrit le : 7 décembre 2016
Version d'Excel : MAC 2016

Message par Jave » 9 août 2019, 16:12

Bonjour à tous

Tout d'abord merci pour l'aide apporter.
J'ai repris pour mon projet la solution de Paritec.
Par contre j'ai voulu modifier une données à savoir au lieu que la cellule soit = "" , je voudrais qu'elle soit < -70.
Et là j'ai 3 lignes où ça ne fonctionne pas.

Je joins la V2 pour que ça soit plus clair....

Encore merci

Ja
Macro texte et couleur V2.xlsm
(16.35 Kio) Téléchargé 1 fois
Avatar du membre
paritec
Passionné d'Excel
Passionné d'Excel
Messages : 3'864
Appréciations reçues : 389
Inscrit le : 7 juin 2011
Version d'Excel : W10 - 2003 FR - 2010 FR

Message par paritec » 9 août 2019, 17:32

Bonsoir Jave le forum
bah oui modifié comme cela c'est sur que cela ne marchera pas !!!
a+
Papou :)
Macro texte et couleur V3.xlsm
(18.43 Kio) Téléchargé 2 fois
Des bonnes explications et des petits fichiers représentatifs vont nous aider à vous aider !!!!
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message