GNouveau venuGégé_AygunInscrit le :16/12/2019Dernière activité :15/06/2020 à 10:12Version d'Excel :2010Messages2Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par Gégé_AygunDateAuteur du sujetSujetExtrait du message11/01/2020 à 16:57Gégé_AygunMise en forme conditionnelle dans une zone de texteBonjour tout le monde, alors voilà j'ai écris ce code : Sub MiseAJourZoneDeTexteDTU() ' ' MiseAJourZoneDeTexteDTU Macro xVal = Sheets("Indicateurs").[AY64] ActiveSheet.Shapes.Range(Array("TextBox 29")).Select With Selection.ShapeRange.Fill .Visible = msoTrue Select Case xVal Case Is > 0 ...11/01/2020 à 16:53t0mmaMise en forme conditionnelle dans zone de texteBonjour, j'ai écris ce code : Sub MiseAJourZoneDeTexteDTU() ' ' MiseAJourZoneDeTexteDTU Macro xVal = Sheets("Indicateurs").[AY64] ActiveSheet.Shapes.Range(Array("TextBox 29")).Select With Selection.ShapeRange.Fill .Visible = msoTrue Select Case xVal Case Is > 0 .ForeColor.RGB = RGB(0, 176...Forums