Macro mise en forme

S

solquagerius

Guest

• 28 Janvier 2011

• #2

Re : Macro mise en forme

Bonjour,

il faudrait faire un truc du style :

Code:

sub coloriage()
dim i as integer
for i = 1 to cells(65535,4).end(xlup).row
select case (cells(i,4))
case 34261:cells(i,4).interior.color=RGB(255,0,0)
case xxx : cells(i,4).interior.color=RGB(R,V,B)
...
end select
next i
end sub

Solqua

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 28 Janvier 2011

• #3

Re : Macro mise en forme

Bonjour mcj1997, le Forum,

Peut-être comme ceci (cf. PJ).

Bonne journée.

 

Pièces jointes

• 00 mcj1997.xls

  40 KB · Affichages: 57

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 28 Janvier 2011

• #4

Re : Macro mise en forme

Salut mcj1997, le Forum

Peut être comme cela dans le Module de la feuille

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [D:D]) Is Nothing Then
If Target.Count > 1 Then Exit Sub
    If Target.Value = "34261" Then Target.EntireRow.Interior.ColorIndex = 3
    If Target.Value = "34251" Then Target.EntireRow.Interior.ColorIndex = 6
    'Etc...
End If
End Sub

EDITION: Salut solquagerius, 00🙂 toujoursàlabourremoi...
Bonne Journée

 

Dernière édition: 28 Janvier 2011

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 28 Janvier 2011

• #5

Re : Macro mise en forme

Re-bonjour,

Les méthodes de Solqua et Dull sont nettement plus "propres" que la mienne 😱 !..

Bonne journée.

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 28 Janvier 2011

• #6

Re : Macro mise en forme

Bonjour à tous

Deux autres propositions dans le classeur joint.​

ROGER2327
#4921

Mardi 3 Gueules 138 (Saint Anthropoïde, policier, SQ)
9 Pluviôse An CCXIX
2011-W04-5T11:11:59Z

 

Pièces jointes

• Mise_en_forme_4921.xls

  22 KB · Affichages: 53

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 28 Janvier 2011

• #7

Re : Macro mise en forme

Re-bonjour,

Dull à dit:

EDITION: Salut solquagerius, 00🙂 toujoursàlabourremoi...
Bonne Journée

Cliquez pour agrandir...

Pas d'accordmoi..., Dull a mieux travaillé...🙂 tout comme solquagerius 🙂et Roger2327 🙂 !

A bientôt...

 

Vote positif 0 Vote négatif