Доброго дня, товарищи.
Возможно ли сократить данный код? Чтобы не перечислять каждую сторону, а как-то - ..EDGE и всё.
Возможно ли сократить данный код? Чтобы не перечислять каждую сторону, а как-то - ..EDGE и всё.
Код |
---|
With Selection .Borders.LineStyle = xlNone .Borders(xlEdgeBottom).LineStyle = xlDouble .Borders(xlEdgeLeft).LineStyle = xlContinuous .Borders(xlEdgeRight).LineStyle = xlContinuous .Borders(xlEdgeTop).LineStyle = xlContinuous End With |
"..Сладку ягоду рвали вместе, горьку ягоду я одна."