mise en forme conditionnelle

[phil]

j'ai besoin de 9 mises en formes conditionnelles
vu qu'on est limité à 3, y a-t-il un moyen de transformer une mise en forme conditionnelle en mise en forme définitive?

 

[Pyrof]

salut

Il faut utiliser la macro dans la sheet

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

tester la cellule et sa valeur et donc faire sa mise en forme

 

[Valérie]

Bonjour à tous,

Peut-être aussi qu'il faut dire Bonjour,
S'il vous plait, merci et AU REVOIR!!

Mais tout ça est d'un autre temps...

@ bientôt

 

[@+Thierry]

Bonjour Valérie et Pyrof

Valérie ne te fatigue plus avec ce genre de chose.... tu refile un lien et Hop !

Hey Phil, un pti tour vers Ici.... !!! et tu verras la liste des conditions...


Bon Aprèm
@+Thierry

 

[Valérie]

Salut à tous les lecteurs

TRES BONNE IDEE Thierry, l'idée du lien me plait beaucoup mais tu commences à cerner mes lacunes notemment en matière de la mise en place des liens dans mes posts... J'y travaille

@+
Valérie

 

[Mytå]

Salut Phil, Pyrof, Valerie, @+Thierry et le Forum

Meme sans les usages de politesse (Phil) une soluce de base ici pour une celulle, et 4 varaibles a toi d'adapter a tes besoins.

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1").Value = 1 Then
Range("A1").Select
With Selection.Interior
.ColorIndex = 43
.Pattern = xlSolid
End With
Else
If Range("A1").Value = 2 Then
Range("A1").Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Else
If Range("A1").Value = 3 Then
Range("A1").Select
With Selection.Interior
.ColorIndex = 45
.Pattern = xlSolid
End With
Else
If Range("A1").Value >= 4 Then
Range("A1").Select
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End If
End If
End If
End If
Range("C10").Select
End Sub

Mytå

 

[Mytå]

Re le forum

Un exemple sur le forme a l'url suivant 20 format de couleurs de celulles

<a href "http://www.excel-downloads.com/html/French/tele_clic.php?nom_fichier=Test%20Couleur"> par là !!! </a>

Mytå

 

[Pyrof]

Salut Myta °°° et tous les autres,

Au lieu de faire des tas de if utilise select case se serat plus simple.


Secondo
Cette macro evenementielle va s'executé a tous cahangements de valeur dans la feuille. ce qui peut prendre du temps.

je conseille de faire le test si le changement se porte sur la celllule concernée
if target.column=1 and target.row=1 then
action
end if

les tests de mise en forme ne se feront que si on modifie la cellule A1.

 

[phil]

ok mea culpa, vous avez mille fois raison
je présente mes excuses à tout le monde
le pire, c'est que je rale quand je lis ce genre de post! 🙂
à ma décharge, j'étais un peu pressé (c'est pour le boulot...)
en ce qui concerne ma demande, j'ai cru comprendre que seule une macro pouvait résoudre mon problème
alors j'oublie, pas assez pointu!
(non seulement, il est pas poli, mais en plus il est nul!)
merci quand meme pour votre aide
sans rancune?