Call us on +234 818 422 6144

Home » Articles posted by didymario7

Author Archives: didymario7

SPARKLE AT 50

Read More...

IRENE WEDS DAMOPE

Read More...

SHALEWA AND MOYO

Read More...

HABEEB AND DAYO

Read More...

AISL FAMILY FUN DAY

Read More...

Search replace shc results

AGRIC Sub AgricResultSheet() Workbooks.Open ThisWorkbook.Path & “\agric-score-sheet-ss2-veritas-1st-term-2015-2016.xlsx” Range(“H2:N2,H3:N3,H4:N4,H5:N5,H6:N6,H7:N7,H8:N8,H9:N9,H10:N10,H11:N11,H12:N12,H13:N13,H14:N14,H15:N15,H16:N16,H17:N17,H18:N18,H19:N19,H20:N20,H21:N21,H22:N22,H23:N23,H24:N24,H25:N25,H26:N26,H27:N27,H28:N28,H29:N29,H30:N30,H31:N31,H32:N32″).Copy Application.DisplayAlerts = False ActiveWorkbook.Close ActiveSheet.Paste Destination:=Worksheets(“sheet1″).Range(“CH2:CN2″) End Sub ALL SUBJECT Sub AllSubjectResultSheet() Workbooks.Open ThisWorkbook.Path & “\agric-score-sheet-ss2-veritas-1st-term-2015-2016.xlsx” Range(“H2:N2,H3:N3,H4:N4,H5:N5,H6:N6,H7:N7,H8:N8,H9:N9,H10:N10,H11:N11,H12:N12,H13:N13,H14:N14,H15:N15,H16:N16,H17:N17,H18:N18,H19:N19,H20:N20,H21:N21,H22:N22,H23:N23,H24:N24,H25:N25,H26:N26,H27:N27,H28:N28,H29:N29,H30:N30,H31:N31,H32:N32″).Copy Application.DisplayAlerts = False ActiveWorkbook.Close ActiveSheet.Paste Destination:=Worksheets(“sheet1″).Range(“CH2:CN2″) Workbooks.Open ThisWorkbook.Path & “\biology-score-sheet-ss2-veritas-1st-term-2015-2016.xlsx” Range(“H2:N2,H3:N3,H4:N4,H5:N5,H6:N6,H7:N7,H8:N8,H9:N9,H10:N10,H11:N11,H12:N12,H13:N13,H14:N14,H15:N15,H16:N16,H17:N17,H18:N18,H19:N19,H20:N20,H21:N21,H22:N22,H23:N23,H24:N24,H25:N25,H26:N26,H27:N27,H28:N28,H29:N29,H30:N30,H31:N31,H32:N32″).Copy Application.DisplayAlerts = False ActiveWorkbook.Close ActiveSheet.Paste Destination:=Worksheets(“sheet1″).Range(“BF2:BL2″) Workbooks.Open ThisWorkbook.Path & “\chemistry-score-sheet-ss2-veritas-1st-term-2015-2016.xlsx” Range(“H2:N2,H3:N3,H4:N4,H5:N5,H6:N6,H7:N7,H8:N8,H9:N9,H10:N10,H11:N11,H12:N12,H13:N13,H14:N14,H15:N15,H16:N16,H17:N17,H18:N18,H19:N19,H20:N20,H21:N21,H22:N22,H23:N23,H24:N24,H25:N25,H26:N26,H27:N27,H28:N28,H29:N29,H30:N30,H31:N31,H32:N32″).Copy Application.DisplayAlerts = False ActiveWorkbook.Close ActiveSheet.Paste Destination:=Worksheets(“sheet1″).Range(“AR2:AX2″) Workbooks.Open ThisWorkbook.Path […]

Read More...