Bonjour,

j'ai fait un classeur ou je rentre des produits dans une feuille du classeur, après en appuyant sur un bouton je copie le produit rentré dans une liste qui se trouve sur une autre feuille. cela marche très bien.

Ce que je voudrais faire c'est sur ma feuille avec la liste des produits c'est mettre les bordures automatiquement à la nouvelle ligne copiée.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Private Sub Worksheet_Activate()
 Dim cellule As Range
 For Each cellule In Range("B2:H25")
 If cellule <> "" Then cellule.Borders.Weight = xlThin
Next
End Sub
Alors ce code marche très bien mais une fois que la cellule H25 est remplie ça ne marchera plus , alors je voudrais qu'il mette la bordure a chaque fois qu'il y a une nouvelle cellule remplie.

je ne sais pas comment faire.

merci pour votre aide