supprimer une partie du format de cellule

[obyone]

bonjour,
je souhaite effacer en vba une partie du format de cellule (bordure et remplissage)
j'ai essayé

sheets("Equilibrage").cells.ClearFormats
mais cela m'efface tout
pouvez vous m'aider un peu?
merci

 

[Gelinotte]

Re : supprimer une partie du format de cellule

Allô!

Composé à partir de l'enregistrement automatique de macros :

sheets("Equilibrage").Cells.Select
Selection.Cells.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Cells.Borders(xlDiagonalUp).LineStyle = xlNone
Selection.Cells.Borders(xlEdgeLeft).LineStyle = xlNone
Selection.Cells.Borders(xlEdgeTop).LineStyle = xlNone
Selection.Cells.Borders(xlEdgeBottom).LineStyle = xlNone
Selection.Cells.Borders(xlEdgeRight).LineStyle = xlNone
Selection.Cells.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Cells.Borders(xlInsideHorizontal).LineStyle = xlNone
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
sheets("Equilibrage").Range("A1").Select


Perdrix

 

[obyone]

Re : supprimer une partie du format de cellule

merci ca fontionne