Rapport de message :*
 

Re: Suite de cellules colorées

Titre du sujet : Re: Suite de cellules colorées
par JCGL le 27/05/2007 11:03:31

Re,

Pour les bordures, tu risques d'avoir un souci :

  • une bordure horizontale devient verticale à la première courbe du réseau

  • une bordure verticale devient horizontale.......

  • et vont finir par encadrer toutes les cellules sélectionnées



    • Ici pour les bordures horizontales (IL FAUDRA LES EFFACER AU CHANGEMENT D'ITINERAIRE)


    Citation :
    Case 1 'itineraire 1
    Range("G8:X8,Y9:Z9,Z10:Z20,R20:Y20,P19:R19,P16:P18,J16:O16").Select
    Selection.Interior.Color = vbGreen
    With Selection.Borders(xlEdgeTop)
    .LineStyle = xlContinuous
    .Weight = xlThin
    .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeBottom)
    .LineStyle = xlContinuous
    .Weight = xlThin
    .ColorIndex = xlAutomatic
    End With




    Au plaisir

    mDF : Petit souci avec les balises Code et Formule A+