Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Couleur Police si Texte Barré

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

MuscatMimi

XLDnaute Accro
Bonsoir

Je valide des données dans une Feuil
Plage (A6:M23)depuis des Tbx situées dans un Usf
(je barre ou non le texte pour chaque Tbx via une Macro)
Une fois ces données Validées dans la feuille,j'aimerai arriver a faire
ceci
Si texte validé, est " Barré" alors Couleur "Bleu"dans la feuille
Si Texte validé non "Barré" Couleur "Rouge"dans la Feuille

Espérant avoir bien expliqué
merci a tous par avance
Cordialement
 
Re : Couleur Police si Texte Barré

Ce n’est pas très bien expliqué mais on comprend…
On ne peut affecter une mise en forme conditionnelle (SI…) qu’à une valeur.
Ainsi on peut écrire :
SI telle cellule a telle valeur, ALORS, lui donner telle mise en forme.
Mais on ne peut pas écrire :
SI telle cellule à telle mise en forme, alors lui donner telle autre mise en forme.
Le mieux pour vous, je crois, est d’ajouter à gauche (ou à droite) de chacune de vos colonnes, une nouvelle colonne, qui pourra avoir une largeur nulle. Votre macro devra valider vos cellules non pas en les barrant mais en attribuant une valeur (par exemple 1) dans la cellule voisine.
Il sera alors facile de créer une formule disant que SI la cellule voisine à une valeur 0 (ou si elle est vide) alors celle-ci sera bleue et SI la valeur est égale à 1 (ou si elle contient une valeur), alors elle sera rouge.
 
Re : Couleur Police si Texte Barré

Bonsoir Histoire orale

merci de ta contribution,mais ce que tu dis je le sais
J'aimerais arriver a ce que je désire par une autre formule
alors ,j'attends d'autres propsitions suivant ma demande
enfin,si c'est réalisable

bonne soirée
 
Re : Couleur Police si Texte Barré

Bonjour

lors de l'enregistrement des données testes à ce moment

VB:
Private Sub CommandButton2_Click()
With Range("A1")
  .Value = Me.TextBox1
  .Interior.ColorIndex = IIf(Me.TextBox1.Font.Strikethrough = True, 41, 3)
End With
End Sub
 
Re : Couleur Police si Texte Barré

Bonsoir Banzai et le Forum

Merci de ton aide,
Mais comme je n'ai que peut de réponses,c'est que
ce que je souhaite réaliser, doit être infaisable
bon week-end
et merci encore Banzai, det'être penché sur ma demande
Cordialement
 
Re : Couleur Police si Texte Barré

Bonsoir à tous

vaucluse immo
Pendant que ...
j'attends d'autres propsitions suivant ma demande
Nous attendons un fichier exemple (avec ton code VBA)

Ce serait plus simple pour effectuer des tests non ?

PS: le code de Banzai64 fonctionne non?
(version légèrement raccourcie)
Code:
Private Sub CommandButton1_Click()
With Range("A1")
  .Value = TextBox1
  .Font.ColorIndex = IIf(TextBox1.Font.Strikethrough, 41, 3)
End With
End Sub
 
Dernière édition:
Re : Couleur Police si Texte Barré

Bonjour Staple,et le Forum

Oups milles excuses,j'ai omis de mettre le Fichier

OUI le Code de Banzai fonctionne trés bien
Le voici

J'ajouterai ,car j'ai pas pensé a le noter dans le premier message,qu'il faut
que je puisse, aprés saisie,de pouvoir Modifier ces Données
en créant un Btn Modifiéer Données

Bon Dimanche
 

Pièces jointes

Re : Couleur Police si Texte Barré

Bonjour Banzai

merci de t'intérresser a mon soucis
Dans ce que tu a fais,si tu Valide une Tbx Bleu Barré(Tbx2)
ça valide biendans la Cellule en Bleu Barré
mais
si a nouveau tu Valide une autre Tbx, (Tbx 3 par exemple)ça remet a la couleur Rouge
la Cellule précédement Barrée Bleu


en plus
Mais,il manque quelque chose
C'est de pouvoir afficher dans les 13 Tbx les Données a l'identique
que celles affichées sur chaque ligne,,de la Feuil "2010"
je ne sais pas si cela est vraiment réalisable

a plus
Cordialement
 
Dernière édition:
Re : Couleur Police si Texte Barré

Bonsoir Banzai

Et bééééééééééééééééééé,bravo, tu est un génie

Je ne serais jamais arrivé a cela,pourtant ça fait des jours que j'y suis

Comme ce n'est pas un sujet souvent abordé, sur ce Forum
Je vais y placer ce Fichier
aprés t'avoir identifié dans le Code;normal de citer l'auteur

Je te souhaite une bonne soirée
et te dis a bientôt

j'espére que n'a pas trop de neige dans ta région

Cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
529
Réponses
7
Affichages
821
Réponses
1
Affichages
780
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…