View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
ryguy7272 ryguy7272 is offline
external usenet poster
 
Posts: 2,836
Default Activecell select properties

I found the code below on this very same DG a while back:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim v As Variant
v = Array(xlEdgeBottom, xlEdgeTop, xlEdgeRight, xlEdgeLeft)
For Each r In ActiveSheet.UsedRange
With r
For i = 0 To 3
..Borders(v(i)).LineStyle = xlNone
Next
End With
Next

For i = 0 To 3
With ActiveCell.Borders(v(i))
..LineStyle = xlContinuous
..Weight = xlThick
..ColorIndex = 7
End With
Next
End Sub


HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"dgold82" wrote:

Thanks so much for the replies!

Jim:

Yes, it was rowliner that I was thinking about above. It actually does
exactly the opposite of what I want to do with my worksheet. There is no
option to remove the black border excel puts around an active cell. I have
been playing with it for a while.

Steven:

My workbook has dozens of worksheets, they are organized like you mentioned.
Input pages (that are radio buttons), hidden pages which all the input pages
dump too and report pages.

Problem is that the input pages and reports need to be clickable/selectable
when locked. If they aren't then many of my hyperlinks don't work and some
other macros as well.

This is not really a deal breaker. One of the ways I was thinking about
getting around it was to place a rectangle over a worksheet and make the fill
100% transparent. Kinda ugly behind the scenes, but it prevents the user from
clicking on cells while allowing them to be selectable while locked.

I would still love a way to hid the select border if possible on an active
cell. I'm sure there is a way to do it via VBA somehow. Thanks for the help
though!

"Jim Thomlinson" wrote:

http://www.cpearson.com/excel/RowLiner.htm
--
HTH...

Jim Thomlinson


"dgold82" wrote:

This is a variance on an earlier question of mine. I was trying to completely
hide the little border when selecting a cell. Doesn't look like you can do
this.

I was thinking that perhaps we can change the visible properties of it. I
saw a great addin from someone (can't remember who) that allows for an active
cell to be highlighted certain colors as you click around, but not the actual
select border. If I can make it white or transparent that could be a good
workaround for me.

My end goal was really to make a worksheet unselectable (inputs are radio
buttons) but I need it to be selectable for certain macros and hyperlinks to
work. I am trying to mimic the look of an unselectable worksheet.

Help would be most appreciated!