Prev: Macro to insert a text box in Word 2007
Next: disable Submit button
From: Sue Lee Sue on 4 Mar 2010 11:03
I downloaded the Microsoft Word template "Employee performance review form
(short)" which has checkboxes that rates the employee performance. Can
someone assist in placing a value to each checkbox, then a overall rating
that averages the numbers?
Example the first category has ratings of 1 = Unsatisfactory and the first
row is Job Knowledge and checkbox is clicked 1 = Unsatisfactory. The second
row is Work Quality and the checkbox is clicked 4 = Exceeds Expectations.
After all rows are rated, then an average would calculate in a box.
I am currently using Word 2003.
From: Fumei2 via OfficeKB.com on 4 Mar 2010 16:33
I am not familiar with the template, but a checkbox is boolean, its value is
either True, or False.

In itself, it does not have values like 1, or 4.

That being said, you could build something logically. Although from the
sounds of it, this would get complicated.

Sue Lee wrote:
>I downloaded the Microsoft Word template "Employee performance review form
>(short)" which has checkboxes that rates the employee performance. Can
>someone assist in placing a value to each checkbox, then a overall rating
>that averages the numbers?
>Example the first category has ratings of 1 = Unsatisfactory and the first
>row is Job Knowledge and checkbox is clicked 1 = Unsatisfactory. The second
>row is Work Quality and the checkbox is clicked 4 = Exceeds Expectations.
>After all rows are rated, then an average would calculate in a box.
>I am currently using Word 2003.

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.aspx/word-programming/201003/1

From: Doug Robbins - Word MVP on 4 Mar 2010 17:14
If you assign bookmark names of the following form to each of the checkboxes

Checkij

where i is the row number and j is the order of the check box in that row,
such as

Check11, Check12, Check13, Check14, Check15
Check21, Check22, Check23, Check24, Check25
..
..
..
Check61, Check62, Check63, Check64, Check65

and then add a text formfield with the bookmark name of Average to hold the
average, and then set a macro containing the following code to be run on
entry to that formfield, it will be populated with the average of the
checkboxes:

Dim i As Long, k As Long, n As Long
With ActiveDocument
n = 0
For i = 1 To 6
For j = 1 To 5
If .FormFields("check" & i & j).CheckBox.Value = True Then
n = n + j
End If
Next j
Next i
.FormFields("Average").result = n / 6
End With

The form would be enhanced by the inclusion of code to prevent more than one
check box in a row from being checked which can be done by following the
method in the article "Making groups of Check Box Form Fields mutually
exclusive (so that they behave like radio buttons)” at:

http://www.word.mvps.org/FAQs/TblsFldsFms/ExclusiveFmFldChbxs.htm

using the following code in place of that in the article

Sub MakeCheckBoxesExclusive()
Dim oField As FormField
For Each oField In Selection.Rows(1).Range.FormFields
oField.CheckBox.Value = False
Next oField
Selection.FormFields(1).CheckBox.Value = True
End Sub



--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

"Sue Lee" <Sue Lee(a)discussions.microsoft.com> wrote in message
news:BF9585A7-C47C-4CAC-95AC-3B68D977DCBC(a)microsoft.com...
> I downloaded the Microsoft Word template "Employee performance review form
> (short)" which has checkboxes that rates the employee performance. Can
> someone assist in placing a value to each checkbox, then a overall rating
> that averages the numbers?
> Example the first category has ratings of 1 = Unsatisfactory and the first
> row is Job Knowledge and checkbox is clicked 1 = Unsatisfactory. The
> second
> row is Work Quality and the checkbox is clicked 4 = Exceeds Expectations.
> After all rows are rated, then an average would calculate in a box.
> I am currently using Word 2003.

 | 
Pages: 1
Prev: Macro to insert a text box in Word 2007
Next: disable Submit button