Hi all,
When i put a value into a cell in Column D.
Put bottom border in cells on that row, but just Columns A:F
This works except for the way i am selecting Col A:F
If i just put A or F it works for that one column.
Any direction?
Code:
--------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
With Range("A:F" & Target.Row)
With .Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
End With
End If
End Sub
--------------------
--
Desert Piranha
------------------------------------------------------------------------
Desert Piranha's Profile:
http://www.excelforum.com/member.php...o&userid=28934
View this thread:
http://www.excelforum.com/showthread...hreadid=492462