Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel problème affichage format texte sur réponse

problème affichage format texte sur réponse

9 réponses
Avatar
night_goblins
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit différente
ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
MichDenis
Tu sélectionnes ta plage,
Barre de menu / format / Mise en forme conditionnelle
La formule est : ¡="non" tu choisis le format désiré
à l'aide du bouton "Format"

Un clic sur le bouton "ajouter" pour une seconde mise en forme
La formule est : = A1="oui" , et tu choisis le format désiré

dans les formules : A1 représente la première cellule de la plage.



"night_goblins" a écrit dans le message de news:
4571672b$0$21148$
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit différente
ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal
Avatar
night_goblins
merci encore pour ta réponse
zut de zut on est limité à 3 mises en formes conditionnelles
pour mon problème j'en ai besoin de +
si = oui .......vert
si = non....... jaune
si= peut etre........ noir
si=bof...........bleu
etc



"MichDenis" a écrit dans le message de
news:
Tu sélectionnes ta plage,
Barre de menu / format / Mise en forme conditionnelle
La formule est : ¡="non" tu choisis le format désiré
à l'aide du bouton "Format"

Un clic sur le bouton "ajouter" pour une seconde mise en forme
La formule est : = A1="oui" , et tu choisis le format désiré

dans les formules : A1 représente la première cellule de la plage.



"night_goblins" a écrit dans le message de news:
4571672b$0$21148$
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit différente
ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal






Avatar
MichDenis
Tu peux utiliser ce type de procédure dans le module feuille où l'action se déroule :

Tu choisis la plage que tu désires : Range("A1:A10")
et tu peux mettre autant de condition (couleurs) que tu désires.

'------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

Dim Rg As Range, C As Range
Set Rg = Intersect(Target, Range("A1:A10"))
If Not Rg Is Nothing Then
For Each C In Rg
Select Case UCase(C.Value)
Case "BLEU"
With C
.Font.ColorIndex = 12
.Font.Bold = True
.Interior.ColorIndex = 40
End With
Case "VERT"
With C
.Font.ColorIndex = 38
.Font.Bold = True
.Interior.ColorIndex = 8
End With
Case "JAUNE"
With C
.Font.ColorIndex = 3
.Font.Bold = True
.Interior.ColorIndex = 25
End With
Case Else
With C
.Font.ColorIndex = xlAutomatic
.Font.Bold = False
.Interior.ColorIndex = xlNone
End With
End Select
Next
End If
End Sub
'------------------------------------




"night_goblins" a écrit dans le message de news:
45717444$0$21144$
merci encore pour ta réponse
zut de zut on est limité à 3 mises en formes conditionnelles
pour mon problème j'en ai besoin de +
si = oui .......vert
si = non....... jaune
si= peut etre........ noir
si=bof...........bleu
etc



"MichDenis" a écrit dans le message de
news:
Tu sélectionnes ta plage,
Barre de menu / format / Mise en forme conditionnelle
La formule est : ¡="non" tu choisis le format désiré
à l'aide du bouton "Format"

Un clic sur le bouton "ajouter" pour une seconde mise en forme
La formule est : = A1="oui" , et tu choisis le format désiré

dans les formules : A1 représente la première cellule de la plage.



"night_goblins" a écrit dans le message de news:
4571672b$0$21148$
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit différente
ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal






Avatar
night_goblins
Oh la
merci
ca se complique
ca ressemble à une macro ?
je vais certainement passé pour un novice..., j'ai un excel en fr et on
pratique comment pour ton ... truc ??

"MichDenis" a écrit dans le message de
news:%
Tu peux utiliser ce type de procédure dans le module feuille où l'action
se déroule :


Tu choisis la plage que tu désires : Range("A1:A10")
et tu peux mettre autant de condition (couleurs) que tu désires.

'------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

Dim Rg As Range, C As Range
Set Rg = Intersect(Target, Range("A1:A10"))
If Not Rg Is Nothing Then
For Each C In Rg
Select Case UCase(C.Value)
Case "BLEU"
With C
.Font.ColorIndex = 12
.Font.Bold = True
.Interior.ColorIndex = 40
End With
Case "VERT"
With C
.Font.ColorIndex = 38
.Font.Bold = True
.Interior.ColorIndex = 8
End With
Case "JAUNE"
With C
.Font.ColorIndex = 3
.Font.Bold = True
.Interior.ColorIndex = 25
End With
Case Else
With C
.Font.ColorIndex = xlAutomatic
.Font.Bold = False
.Interior.ColorIndex = xlNone
End With
End Select
Next
End If
End Sub
'------------------------------------




"night_goblins" a écrit dans le message de news:
45717444$0$21144$
merci encore pour ta réponse
zut de zut on est limité à 3 mises en formes conditionnelles
pour mon problème j'en ai besoin de +
si = oui .......vert
si = non....... jaune
si= peut etre........ noir
si=bof...........bleu
etc



"MichDenis" a écrit dans le message de
news:
Tu sélectionnes ta plage,
Barre de menu / format / Mise en forme conditionnelle
La formule est : ¡="non" tu choisis le format désiré
à l'aide du bouton "Format"

Un clic sur le bouton "ajouter" pour une seconde mise en forme
La formule est : = A1="oui" , et tu choisis le format désiré

dans les formules : A1 représente la première cellule de la plage.



"night_goblins" a écrit dans le message de
news:


4571672b$0$21148$
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit
différente


ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal











Avatar
MichDenis
Sur la feuille où l'action doit de passer
un clic droit sur l'onglet de ta feuille,
menu "Visionner le code" et tu copies
le code que j'ai commis.

et maintenant, entre les couleurs mentionnées
dans le code dans une des cellules de la plage
A1:A10

Tu peux modifier les couleurs dans le code,
la plage de cellules où la procédure va s'appliquer,
et tu peux répéter dans la procédure autant de "case"
que tu désires.


"night_goblins" a écrit dans le message de news:
45717ced$0$21149$
Oh la
merci
ca se complique
ca ressemble à une macro ?
je vais certainement passé pour un novice..., j'ai un excel en fr et on
pratique comment pour ton ... truc ??

"MichDenis" a écrit dans le message de
news:%
Tu peux utiliser ce type de procédure dans le module feuille où l'action
se déroule :


Tu choisis la plage que tu désires : Range("A1:A10")
et tu peux mettre autant de condition (couleurs) que tu désires.

'------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

Dim Rg As Range, C As Range
Set Rg = Intersect(Target, Range("A1:A10"))
If Not Rg Is Nothing Then
For Each C In Rg
Select Case UCase(C.Value)
Case "BLEU"
With C
.Font.ColorIndex = 12
.Font.Bold = True
.Interior.ColorIndex = 40
End With
Case "VERT"
With C
.Font.ColorIndex = 38
.Font.Bold = True
.Interior.ColorIndex = 8
End With
Case "JAUNE"
With C
.Font.ColorIndex = 3
.Font.Bold = True
.Interior.ColorIndex = 25
End With
Case Else
With C
.Font.ColorIndex = xlAutomatic
.Font.Bold = False
.Interior.ColorIndex = xlNone
End With
End Select
Next
End If
End Sub
'------------------------------------




"night_goblins" a écrit dans le message de news:
45717444$0$21144$
merci encore pour ta réponse
zut de zut on est limité à 3 mises en formes conditionnelles
pour mon problème j'en ai besoin de +
si = oui .......vert
si = non....... jaune
si= peut etre........ noir
si=bof...........bleu
etc



"MichDenis" a écrit dans le message de
news:
Tu sélectionnes ta plage,
Barre de menu / format / Mise en forme conditionnelle
La formule est : ¡="non" tu choisis le format désiré
à l'aide du bouton "Format"

Un clic sur le bouton "ajouter" pour une seconde mise en forme
La formule est : = A1="oui" , et tu choisis le format désiré

dans les formules : A1 représente la première cellule de la plage.



"night_goblins" a écrit dans le message de
news:


4571672b$0$21148$
bonjour
je sais l'objet est pas très clair.
je cherche comment faire pour que :
sur une question a choix (SI....) avec une réponse en texte,
que la couleur du texte ou de la typo (suivant la réponse) soit
différente


ex: il fait beau
oui (réponse caractère en bleu)
non (réponse caractère en rouge et gras)

également pour ce même problème
que la couleur de la cellule soit différente
ex: il fait beau
oui (réponse fond de cellule en bleu)
non (réponse fond de cellule en en rouge)

voir même combiner le truc
ex: il fait beau
oui (réponse caractère en bleu, fond de cellule blanc)
non (réponse caractère en rouge et gras, fond de cellule jaune)

je n'avais pas eu pour l'instant ce genre de demande sur les questions à
choix multiples
alors a vos plumes

merci

pascal











Avatar
night_goblins
vraiment désolé, mais là je comprend rien
j'ai copiè le code dans l'onglet en mode visuel

mais rapport à mon problème je vois pas
donc j'expose le problème (pour une cellule)
=SI(I2<>0;SI(I7>0;SI(I8<=I7+I27*5;SI(I8=I7+I27*5;"planète pleine";"à vous de
jouer...");"cases dispo. dépassées!");"entrez le nombre de cases");"veuillez
nommer la planète")

actuellement et pas rapport au 3 conditions max, j'ai
condition 1
la valeur... égale à ="planète pleine" fond de cellule
rouge caractère gras

condition 2
la valeur... égale à ="entrez le nombre de cases" fond de
cellule en auto(bleu) caractère rouge

condition 3
la valeur... égale à ="cases dispo. dépassées!" fond de
cellule rose caractère gras

************
j'aurai voulu en +
comme la condition 2 : veuillez nommer la planète fond de
cellule en auto (bleu) caractère rouge
*************

par défaut rien à faire "à vous de jouer..." en auto (bleu) caractère
en auto


je vois pas trop comment intégrer ta manip par rapport a ma cellule après
l'avoir copiée

encore une fois je suis vraiment désolé de mon ignorance....

pascal
Avatar
MichDenis
Un fichier exemple là : http://cjoint.com/?mcp2AzWYnZ


Pour ce qui est de ta formule :
=SI(I2<>0;SI(I7>0;SI(I8<=I7+I27*5;SI(I8=I7+I27*5;"planète ...

Je n'ai pas d'idée de ce que tu parles !




"night_goblins" a écrit dans le message de news:
45718e50$0$21145$
vraiment désolé, mais là je comprend rien
j'ai copiè le code dans l'onglet en mode visuel

mais rapport à mon problème je vois pas
donc j'expose le problème (pour une cellule)
=SI(I2<>0;SI(I7>0;SI(I8<=I7+I27*5;SI(I8=I7+I27*5;"planète pleine";"à vous de
jouer...");"cases dispo. dépassées!");"entrez le nombre de cases");"veuillez
nommer la planète")

actuellement et pas rapport au 3 conditions max, j'ai
condition 1
la valeur... égale à ="planète pleine" fond de cellule
rouge caractère gras

condition 2
la valeur... égale à ="entrez le nombre de cases" fond de
cellule en auto(bleu) caractère rouge

condition 3
la valeur... égale à ="cases dispo. dépassées!" fond de
cellule rose caractère gras

************
j'aurai voulu en +
comme la condition 2 : veuillez nommer la planète fond de
cellule en auto (bleu) caractère rouge
*************

par défaut rien à faire "à vous de jouer..." en auto (bleu) caractère
en auto


je vois pas trop comment intégrer ta manip par rapport a ma cellule après
l'avoir copiée

encore une fois je suis vraiment désolé de mon ignorance....

pascal
Avatar
night_goblins
c'est pas grave
je crois comprendre
mais où trouver la correspondance des couleurs ?
12=?
40=?
etc
merci
Avatar
Francois L
c'est pas grave
je crois comprendre
mais où trouver la correspondance des couleurs ?
12=?
40=?
etc
merci




Bonsoir,

Colle la procédure qui suit dans un module standard
Sub zaza()
For i = 1 To 56
Range("A" & i).Interior.ColorIndex = i
Range("B" & i).Value = i
Next
End Sub

Attention, la procédure va écrire en A1:B56 de la feuille active !

--
François L