How can I get individual reports from excell gradebook?

K

KaKa

I want to write progress reports for each student, based on the information
entered in an Excel gradebook. How can I do this, so that the name of each
assignment and it's points appears on an individualized report for each
student?
 
J

Jason Morin

It depends on how your gradebook is set up. For example,
if you had names in column A, with assignments in row 1
and grades across the columns:

Name Assignment #1 Assignment #2 Assignment #3
Jack A B B
Melissa B+ B+ B
John A A- C+
Diana B+ A+ A
Luke C- C B-

You could apply an AutoFilter (Data > Filter >
AutoFilter) and filter by name in col. A. Then Print. Or
you could even use a simple macro like the one below to
print each student and their scores on an individual
pages:

Sub PrintGradesbyName()
Dim LastRow As Long
Dim i As Long

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

With ActiveSheet
.PageSetup.PrintTitleRows = "$1:$1"
For i = 2 To LastRow
.Rows(i).PrintOut Copies:=1, Collate:=True
Next i
End With

End Sub

---
To use, copy the code above, press ALT+F11, go to Insert
Module, and paste in the code. Then Press ALT+Q to
close VBE. In XL, go to Tools > Macro > Macros and run
the macro.

HTH
Jason
Atlanta, GA
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top