Thread: click functions
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_6_] Bob Phillips[_6_] is offline
external usenet poster
 
Posts: 11,272
Default click functions

Try using a column for the checkboxes, and some code like this to put a tick
in the cell
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

With Target
If .Column = 1 Then
.EntireColumn.Clear
If .Value = "a" Then
.Value = ""
.Font.Name = "Arial"
.Offset(0, 1).Value = ""
Else
.Value = "a"
.Font.Name = "Marlett"
End If
End If
End With
End Sub


'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"jlong " wrote in message
...
I have a range of 20 possible measurments that correspond to 20 items, I
have made a table and want to set it up so that the user has to click
the cell (or check box) that corresponds to the items measurment. only
1 out of the 20 possible can selected at a time for each item and the
checked cell must make that cell = "X" or true. Please help???


---
Message posted from http://www.ExcelForum.com/