Ligne de couleur 1/2

[VB@D]

Bonjour le forum

Pour plus de lisibilité de mon tableau je voudrais que les cellules soient grisées une ligne sur deux à partir de la ligne 31. Mon tableau ce rempli grace a une Userform et des textboxs. Grace a ce userform je peux valider la saisi ou inserer une ligne. Je ne peux donc pas le faire manuellement. Il me faut je pense un code VB@.

L'idée serait donc de grisé la ligne 31 puis la 33 puis 35 des que je valide ou insert une ligne en cliquant sur les boutons jusqu'à la dernière ligne de la collone A.

Merci d'avance pour votre aide.

VB@D

 

[vincent]

Bonsoir

voilà une macro qui grisera 1 ligne sur 2 à partir de la ligne 31

Option Explicit

Sub colorierrangs()
Dim i As Long
For i = 31 To 65535 Step 2
Rows(i).Interior.ColorIndex = 15
Next
End Sub

Ayant un petit doute sur ce que tu veux (si la solution ci dessus n'est pas celle recherche) il me faudrait le code qui te permet de valider la saisie ou d'inserer la ligne

@+Vincent

 

[- €ric -]

Salut @tous,

une mise en forme conditionnelle : sélectionner les lignes concernées, puis :
la formule est : =MOD(LIGNE(A31);2)=0
choisir le forat de ces lignes puis valider.

J'espère que ça répond à ton Pb..


Bye et @ +

- €ric -

 

[VB@D]

Bonjour Vincent, €ric et les autres.

Merci de vos réponses

Je test dans la soiré et je vous dit si ca va

Encore merci

@+

VB@D

 

[andré]

Salut à toutes et à tous,

Pourquoi réinventer ce que Excel possède déjà :

Format / Mise en forme automatique / liste 1

Ândré.