Ark68
Well-known Member
- Joined
- Mar 23, 2004
- Messages
- 4,564
- Office Version
- 365
- 2016
- Platform
- Windows
I have this chunk of code:
It's purpose is simple .... remove existing shading of cells in range A13:Q34, and leave behind hairline horizontal lines.
I am unable to get the shading removed with .Interior.ColorIndex = xlNone.
Thoughts?
Code:
If llastrow < 2 Then
.Rows("13:34").Insert Shift:=xlDown
llastrow = 34
With .Range("A13:Q34").Cells
.Interior.ColorIndex = xlNone
.Borders(xlInsideHorizontal).Weight = xlHairline
End With
End If
It's purpose is simple .... remove existing shading of cells in range A13:Q34, and leave behind hairline horizontal lines.
I am unable to get the shading removed with .Interior.ColorIndex = xlNone.
Thoughts?