Change cell fill colour on mouse click

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

PHB - 23 Oct 2004 00:53 GMT

Hi

in order to record pupil achievement I would like to change the fill colour
of any cell in a worksheet by clicking in it once with the mouse.

Can anyone tell me how I go about getting Excel to do this please.

Cheers

PAUL

Reply to this Message

Paul B - 23 Oct 2004 00:56 GMT

Paul, how about when you double click, put in worksheet code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
With Selection.Interior
'change to color you want
.ColorIndex = 34
.Pattern = xlSolid
End With
End Sub

Signature

Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2000 & 2003
** remove news from my email address to reply by email **

> Hi
>
[quoted text clipped - 6 lines]
>
> PAUL

Reply to this Message