P
Pias
Guest
Bonsoir le forum,
Est-ce que quelqu’un peut me dire, SVP, s’il est possible de modifier la macro ci-dessus de manière à que les bordures puissent être crées uniquement dans les cellules, non vides ?
Merci d’avance.
Sub voir_commandes()
Sheets("Commandes").Select
Range("A8:C10008").Select
Selection.Borders(xlInsideVertical).LineStyle = xlContinuous
Selection.Borders(xlInsideHorizontal).LineStyle = xlContinuous
Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous
Selection.Borders(xlEdgeRight).LineStyle = xlContinuous
Selection.Borders(xlEdgeBottom).LineStyle = xlContinuous
Selection.Borders(xlEdgeTop).LineStyle = xlContinuous
End Sub
Amicalement
...On se lasse de tout sauf d’apprendre !..
Est-ce que quelqu’un peut me dire, SVP, s’il est possible de modifier la macro ci-dessus de manière à que les bordures puissent être crées uniquement dans les cellules, non vides ?
Merci d’avance.
Sub voir_commandes()
Sheets("Commandes").Select
Range("A8:C10008").Select
Selection.Borders(xlInsideVertical).LineStyle = xlContinuous
Selection.Borders(xlInsideHorizontal).LineStyle = xlContinuous
Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous
Selection.Borders(xlEdgeRight).LineStyle = xlContinuous
Selection.Borders(xlEdgeBottom).LineStyle = xlContinuous
Selection.Borders(xlEdgeTop).LineStyle = xlContinuous
End Sub
Amicalement
...On se lasse de tout sauf d’apprendre !..