Michael,
Oh my goodness!! I'm very happy about this. This will make my life easier.
I was beginning to think that this wasn't possible. I really appreciate the
time you took to type this out for me.
I would have replied earlier, but I didn't get a message that there was a
reply on this message board so I wasn't checking. I'm so glad I did.
OK, I have a fairly easy question (I think). I did a query that put the
subjects together (instead of showing each paper's grade), added up both the
possible scores and the actual scores, an showed the total percentage for
each subject, kind of like a report card. For some reason, it quit working
and no matter what I do, I cannot get it to work again. Do you know how to
do this? And if so, would it be easy to put the actual letter grade in the
query also?
Thank you,
Jody

)
:
Hi Jody.
If you are still having trouble with the fomatting, try eliminating the
*100 from the formula that calculates the percentage. Then, set the
Format property of that column to "Percent", and the Decimal Places property
to zero.
Additionally, if you place the following function into a module, you should
be able to add a column to your query like this:
Grade: fGrade([ActualScoreField]/[PossibleScoreField])
which will give you the letter grade.
Public Function fGrade(Percentage As Double) As String
Select Case Percentage
Case Is > 1
fGrade = "A+"
Case 0.97 To 1
fGrade = "A+"
Case 0.93 To 0.97
fGrade = "A"
Case 0.9 To 0.93
fGrade = "A-"
Case 0.87 To 0.9
fGrade = "B+"
Case 0.83 To 0.87
fGrade = "B"
Case 0.8 To 0.83
fGrade = "B-"
Case 0.77 To 0.8
fGrade = "C+"
Case 0.73 To 0.77
fGrade = "C"
Case 0.7 To 0.73
fGrade = "C-"
Case 0.67 To 0.7
fGrade = "D+"
Case 0.63 To 0.67
fGrade = "D"
Case 0.6 To 0.63
fGrade = "D-"
Case Else
fGrade = "F"
End Select
End Function
-Michael
:
Thanks again Wayne. For some reason it's not setting the decimal points that
way. I've tried over and over. I'll get it figured out since somehow since
you've reassured me that's the way to do it even if it's not working
correctly yet. I'll just try to make another query and see if this fixes it.
Thank you so much for all your time. I really appreciate it!
Jody

)
:
Hi
Open he properties of the column on the query to set the decimals.
You could use a nested if to get the grades or create a new table and insert
the grades and percentage - either way it would be pro better to simply type
them in
--
Wayne
Manchester, England.
Not an expert.
Enjoy whatever it is you do.
:
YOU'RE AWESOME!!
Thank you very much.
I have a couple more questions, but I didn't want to overwhelm anyone.
Well, I first have a new question. Do you know how I round the percentages
so there's no decimal points? I know how to do this in a datasheet, but not
a query.
More importantly, would you happen to know how I'd now insert a letter grade
automatically from the percentage grades?
Grade Key would be:
A+ A A- B+ B B-
100-97% 96-93% 92-90% 89-87% 86-83% 82-80%
C+ C D+ D- D C- F
79-77% 76-73% 69-67% 62-60% 66-63% 72-70% 59-0%
Thanks Again!
Jody

)
:
Hi
best to do it in a query - create a new column and insert this
Percent

([PosibleScoreField]/[ActualScoreField])*100)
--
Wayne
Manchester, England.
Not an expert.
Enjoy whatever it is you do.
:
Hello, I've made a gradebook for my daughter's homeschooling. On all her
grades, I've put the possible score and her actual score. I would like for
the datasheet to automatically figure out what the percentage is on each
paper. For example, if she scored 10 out of 10 possible, I would like 100%
to show up automatically in the next column without having to figure this out
myself for every paper. Is this possible? Or would it have to be in a
query. Either way, does anyone know how to do it?
Thank you,
Jody

)