ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Grid Lines vs. Borders (https://www.excelbanter.com/excel-programming/284492-grid-lines-vs-borders.html)

Format Challenged

Grid Lines vs. Borders
 
Hello.

Does anyone know if it's possible in Excel XP using VBA to
code a sheet so that the grid lines print very faint
without altering black borders (used for pseudo
underlining)?

If not, is there a way to make an underline appear all the
way across a cell to make it look like a border - even
blank cells?

Your example code would be most helpful in either case.
Thanks in advance for your assistance.

GJones

Grid Lines vs. Borders
 
The folloing does the firs row. You could do them all by
changing the range for the select but remember if you put
the underline in it will print even if there is no data.
So if you were to do this for all lines then you would
print down to 65656.

Sub try()

Rows("1:1").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
Selection.Borders(xlEdgeLeft).LineStyle = xlNone
Selection.Borders(xlEdgeTop).LineStyle = xlNone
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Selection.Borders(xlEdgeRight).LineStyle = xlNone
Selection.Borders(xlInsideVertical).LineStyle = xlNone
End Sub




-----Original Message-----
Hello.

Does anyone know if it's possible in Excel XP using VBA

to
code a sheet so that the grid lines print very faint
without altering black borders (used for pseudo
underlining)?

If not, is there a way to make an underline appear all

the
way across a cell to make it look like a border - even
blank cells?

Your example code would be most helpful in either case.
Thanks in advance for your assistance.
.



All times are GMT +1. The time now is 03:16 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com