Typo -

If the OP wants to make all rectangles transparent yet allow select cells
through the transparent area simply -

Activesheet.ActiveSheet.Rectangles.ShapeRange.Fill = msoFalse

forgot the .Visible -

Activesheet.ActiveSheet.Rectangles.ShapeRange.Fill .Visible = msoFalse

Peter T


"Peter T" <peter_t@discussions wrote in message
...
Perhaps the OP's rectangles have Transparency 100% rather than no-fill.
Visually the same though only the latter allows selection under the
rectangle.

If the OP wants to make all rectangles transparent yet allow select cells
through the transparent area simply -

Activesheet.ActiveSheet.Rectangles.ShapeRange.Fill = msoFalse
(no need to change transparency)

Following toggles threes states -

Sub SeeThroughShapes(nState As Long)
Dim s As String
Select Case nState
Case 0: s = "select through"
Case 1: s = " transparent but not select through"
Case 2: s = "solid"
End Select

On Error Resume Next
Set shr = ActiveSheet.Rectangles.ShapeRange
If shr Is Nothing Then Exit Sub
With shr.Fill
.Visible = CBool(nState)
.Transparency = Abs(CBool(nState < 2))
End With
MsgBox s, , "nState " & nState
End Sub

Sub test2()
Static n&
SeeThroughShapes n
n = n + 1
If n 2 Then n = 0

End Sub

Regards,
Peter T


"Tom Ogilvy" wrote in message
...
I'm just going on what the OP stated:

Although it looks cool, users cannot click on the cells behind it, so I
have
been requested to get rid of the transparent autoshapes.

--
Regards,
Tom Ogilvy

"Peter T" wrote:

I don't understand the problem though it seems others do. If a
rectangle's
fill is transparent it should be possible to select cells behind or
through
the transparent area

at drawing object level -
activesheet.rectangles(1).interior.colorindex = xlnone

or as a shape -
activesheet.shapes(1).fill.visible = msofalse

However if it has a textframe then it's not possible to select
'through'
the
transparent area.

Regards,
Peter T

"geebee" wrote in message
...
hi,

I have some rectangle autoshapes in my spreadsheet that are
transparent.
Although it looks cool, users cannot click on the cells behind it,
so
I
have
been requested to get rid of the transparent autoshapes. Can anyone
ell
me
how to still have these transparent boxes in front of the cells
while
still
allowing the user to click on the cells?

Thanks in advance,
geebee