Can someone help with a VBA code - here is the scenario
I am a teacher and have a grade and credit sheet that I need to push or copy
values (not the formulas) from columns on one sheet to another sheet. I used something like this in my first worksheet (called Grade-
Credits)
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("T2")) Is Nothing Then
Sheets("Progress Report").Range("C7:C49", "D7:D49").Value = _
Me.Range("APR5:AP47", "AR5:AR47").Value
End If
End Sub
BUT - I need ("APR5:AP47", "AR5:AR47") to be copied to different columns if T2 is blank and U2 is checked instead (or has a value in it), the same for V2 and W2. T2, U2, V2, and W2 represent school year quarters.
Thanks - Jim A
Bookmarks