Macro to border row from start column to end column
 

I want to create a macro where if a value is entered in column "B", then
I want the row (from Column A to G) that the value was entered in to be
bordered with a thin outline and thin inside lines.

BUT, if a value in column "B" is deleted, then I want the border
removed in that row from column "A" to "G".

I would use conditional formatting but I've used them up for other
criterias.
This will also perform upon every change in the worksheet...so please
don't forget:

Private Sub WorkSheet_Change(ByVal Target As Excel.Range)


I'm still a novice at VBA, but I'm trying to make a macro right now
that does this.


Thanks in advance.


--
malik641


------------------------------------------------------------------------
malik641's Profile: http://www.excelforum.com/member.php...o&userid=24190
View this thread: http://www.excelforum.com/showthread...hreadid=389185

Macro to border row from start column to end column
 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
If Target.Value = Empty Then
Range(Target.Offset(0, -1), Target.Offset(0,
5)).Borders.LineStyle = xlNone
Else
Range(Target.Offset(0, -1), Target.Offset(0, 5)).Borders.Weight
= xlThin
End If
End If
End Sub
--
HTH...

Jim Thomlinson


"malik641" wrote:


I want to create a macro where if a value is entered in column "B", then
I want the row (from Column A to G) that the value was entered in to be
bordered with a thin outline and thin inside lines.

BUT, if a value in column "B" is deleted, then I want the border
removed in that row from column "A" to "G".

I would use conditional formatting but I've used them up for other
criterias.
This will also perform upon every change in the worksheet...so please
don't forget:

Private Sub WorkSheet_Change(ByVal Target As Excel.Range)


I'm still a novice at VBA, but I'm trying to make a macro right now
that does this.


Thanks in advance.


--
malik641


------------------------------------------------------------------------
malik641's Profile: http://www.excelforum.com/member.php...o&userid=24190
View this thread: http://www.excelforum.com/showthread...hreadid=389185

Macro to border row from start column to end column
 

Hey Jim, thanks a lot! Macro works flawlessly!!!


--
malik641


------------------------------------------------------------------------
malik641's Profile: http://www.excelforum.com/member.php...o&userid=24190
View this thread: http://www.excelforum.com/showthread...hreadid=389185

Macro to border row from start column to end column
 

Now I have another question...
The macro won't work for one of my workbooks. The workbook collects
data from another workbook (i.e. =[Workbook1.xls]Sheet1! type) and I
ALSO want this workbook to have the macro work the same way...but it
won't.

How do I make this macro work for this workbook?


--
malik641


------------------------------------------------------------------------
malik641's Profile: http://www.excelforum.com/member.php...o&userid=24190
View this thread: http://www.excelforum.com/showthread...hreadid=389185

Macro to border row from start column to end column
 

anyone????

--
malik64

-----------------------------------------------------------------------
malik641's Profile: http://www.excelforum.com/member.php...fo&userid=2419
View this thread: http://www.excelforum.com/showthread.php?threadid=38918