microsoft.public.word.vba.general

Hi Doug,

Thank you for helping me with this project. Is there a way to keep the form
field that displays the credit (.5, for example in the first column) and then
add this GPA number (that is created by the macro) to a new field to the
right of the letter grade? The order isn't critical, in terms of looks - but
the teachers will need to see the credits earned by each course.

Thank you sooooooooo much!
Janet

"jlewis" wrote:

> Thank you! Yes - I agree about using Access. I will give this a shot today.
> Thanks again ... Janet
>
> "Doug Robbins - Word MVP" wrote:
>
> > Running a macro containing the following code on exit from each dropdown
> > formfield:
> >
> > Dim i As Long, j As Long, k As Long
> > i = Selection.Information(wdStartOfRangeColumnNumber)
> > j = Selection.Cells(1).Range.FormFields(1).DropDown.Value
> > If j = 1 Or j = 14 Then k = 0
> > If j > 1 And j < 5 Then k = 4
> > If j > 4 And j < 8 Then k = 3
> > If j > 7 And j < 11 Then k = 2
> > If j > 10 And j < 14 Then k = 1
> > Selection.Rows(1).Cells(i - 1).Range.FormFields(1).Result = 0.5 * k
> >
> > Will populate the formfield in the cell to the left of the dropdown with the
> > appropriate value.
> >
> > You have a bit of work ahead of you.
> >
> > I really think that you should be using an Access Database for this sort of
> > thing.
> >
> > --
> > 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
> >
> > "jlewis" wrote in message
> > news:77716EB7-E85F-48FE-8030-360844B194C8@microsoft.com...
> > > OK.... I can't figure out a way to send the actual file. Here's a link
> > > to
> > > it, though. If that's going outside the realm of the newsgroup, I totally
> > > understand and I'll keep plugging away at it. Thanks!
> > >
> > > http://www.sdb.k12.wi.us/lewis/ILP.doc
> > >
> > >
> > >
> > > "Doug Robbins - Word MVP" wrote:
> > >
> > >> It's in my response, but here it is dkr@REMOVECAPSmvps.org
> > >>
> > >> --
> > >> 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
> > >>
> > >> "jlewis" wrote in message
> > >> news:94AFBBC0-58EB-465F-A6EA-1899ED6298F7@microsoft.com...
> > >> > Thanks, Doug. I don't see a way to upload it here. Can you give me
> > >> > your
> > >> > email address please? Thanks again! Janet
> > >> >
> > >> > "Doug Robbins - Word MVP" wrote:
> > >> >
> > >> >> Sent it to me if you want and I will look at it.
> > >> >>
> > >> >> --
> > >> >> 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
> > >> >>
> > >> >> "jlewis" wrote in message
> > >> >> news:64329CCE-EBEB-4DD4-8B73-29BFC1B68D34@microsoft.com...
> > >> >> >I have created this Word doc with form fields. As a teacher enters
> > >> >> >credits
> > >> >> > into the first column of each term, Word form calculation fields
> > >> >> > adds
> > >> >> > up
> > >> >> > the
> > >> >> > credits and displays the cumulative credits at the top right corner
> > >> >> > of
> > >> >> > the
> > >> >> > page.
> > >> >> >
> > >> >> > I would have used Excel for this project, but the end user is only
> > >> >> > receptive
> > >> >> > to the Word document.
> > >> >> >
> > >> >> > I would like to auto-calculate the GPA. Here's how our district
> > >> >> > figures
> > >> >> > that out:
> > >> >> >
> > >> >> > Earned credit (Word FormField1c) * Grade Letter Points
> > >> >> > (WordFormField1g) =
> > >> >> > Value
> > >> >> > Add up all Values and then divide by number of Values
> > >> >> >
> > >> >> > (A+, A, A-)=4 points
> > >> >> > (B+, B, B-)=3 points
> > >> >> > (C+, C, C-)=2 points
> > >> >> > (D+, D, D-)=1 points
> > >> >> > (F)=0 points
> > >> >> >
> > >> >> > Example:
> > >> >> >
> > >> >> > .5*4 (for A-) English 9 = 2
> > >> >> > .5*3 (for B) Algebra = 1.5
> > >> >> >
> > >> >> > (2+1.5)/2= 1.75 GPA
> > >> >> >
> > >> >> > Credits and classes are added ongoing.
> > >> >> >
> > >> >> > I would like to send someone the Word doc that I have so far - if
> > >> >> > anyone
> > >> >> > is
> > >> >> > interested :) Thank you!!
> > >> >>
> > >> >>
> > >> >>
> > >>
> > >>
> > >>
> >
> >
> >