S
Suzie
Hi Julie / Anyone else who can help
Sorry that my earlier post wasn't very clear - this stuff really boggles my
brain.
OK, so here is what I have to do:
I've got a template into which employee evaluations are added, a figure of
1,2,3,4, or 5 (1 being poor - 5 being excellent). These are added into
Column C from Row 12 downwards.
Cell D2 is Overall Evaluation which is an average of all evaluations
entered.
Cell D3 is Recent Evaluation which is an average of the 5 most recent
evaluations entered.
I have entered a formula into Cell E5 to show the Quick Review which is
=Review(d2,d3)
I now have to create a function macro for a Quick Review of these
evaluations which does this:
"If Recent Evaluations average is 4 or higher then display Good otherwise
display Poor
If Recent Evaluations are equal to or higher than Overall Evaluation then
display Improving otherwise display Interview"
So this is the function macro I have done:
Function review(Overall As Single, Recent As Single) As String
If Recent >= 4 Then
review = "good"
Else
review = "poor"
End If
If Recent >= Overall Then
review = "improving"
Else
review = "interview"
End If
review = Overall & Recent
End Function
and all I get in my spreadsheet is the value of D2 placed next to D3 i.e.
33.6 where 3 was in D2 and 3.6 was in D3.
Any help would be greatly appreciated as VBA is one language that I do not
understand.
Thank you
Suzie
Sorry that my earlier post wasn't very clear - this stuff really boggles my
brain.
OK, so here is what I have to do:
I've got a template into which employee evaluations are added, a figure of
1,2,3,4, or 5 (1 being poor - 5 being excellent). These are added into
Column C from Row 12 downwards.
Cell D2 is Overall Evaluation which is an average of all evaluations
entered.
Cell D3 is Recent Evaluation which is an average of the 5 most recent
evaluations entered.
I have entered a formula into Cell E5 to show the Quick Review which is
=Review(d2,d3)
I now have to create a function macro for a Quick Review of these
evaluations which does this:
"If Recent Evaluations average is 4 or higher then display Good otherwise
display Poor
If Recent Evaluations are equal to or higher than Overall Evaluation then
display Improving otherwise display Interview"
So this is the function macro I have done:
Function review(Overall As Single, Recent As Single) As String
If Recent >= 4 Then
review = "good"
Else
review = "poor"
End If
If Recent >= Overall Then
review = "improving"
Else
review = "interview"
End If
review = Overall & Recent
End Function
and all I get in my spreadsheet is the value of D2 placed next to D3 i.e.
33.6 where 3 was in D2 and 3.6 was in D3.
Any help would be greatly appreciated as VBA is one language that I do not
understand.
Thank you
Suzie