Sub MacroTESTE()
    Dim dia_atual, msgembox As String
    dia_atual = [B65]
    msgmbox = MsgBox("Deseja abrir um novo dia? Os dados anteriores sero apagados.", vbInformation + vbYesNo + vbDefaultButton2, "Abrir dia")
        If msgmbox = vbNo Then
        Exit Sub
End If
        Range("J64:K76").Copy
        Range("J64:K76").PasteSpecial Paste:=xlPasteValues
        Application.CutCopyMode = False
            Range("D17:AX17,D27:AX27,D38:AX38,D49:AX49,D60:AX60,D67:H67,M67:AX67,D73:H73,M73:AX73,D79:H79,M79:AX79,D86:AX86,D93:AX93,D100:AX100,D108:AX108,D115:AX115,D122:AX122").ClearContents
            Range("A65").Select
    If ActiveSheet.Range("B66").Value = 1 Then
                [J64].FormulaR1C1 = "=SUM(R[-49]C[-6]+R[-49]C[-3]+R[-49]C+R[-49]C[3]+R[-49]C[6]+R[-49]C[9]+R[-49]C[12]+R[-49]C[15]+R[-49]C[18]+R[-49]C[21]+R[-49]C[24]+R[-49]C[27]+R[-49]C[30]+R[-49]C[33]+R[-49]C[36]+R[-49]C[39]+R[-39]C[-6]+R[-39]C[-3]+R[-39]C+R[-39]C[3]+R[-39]C[6]+R[-39]C[9]+R[-39]C[12]+R[-39]C[15]+R[-39]C[18]+R[-39]C[21]+R[-39]C[24]+R[-39]C[27]+R[-39]C[30]+R[-39]C[33]+R[-39]C[36]+R[-39]C[39]+R[-28]C[-6]+R[-28]C[-3]+R[-28]C+R[-28]C[3]+R[-28]C[6]+R[-28]C[9]+R[-28]C[12]+R[-28]C[15]+R[-28]C[18]+R[-28]C[21]+R[-28]C[24]+R[-28]C[27]+R[-28]C[30]+R[-28]C[33]+R[-28]C[36])"
                [J64].FormulaR1C1 = "=SUM(R[-28]C[39]+R[-17]C[-6]+R[-17]C[-3]+R[-17]C+R[-17]C[3]+R[-17]C[6]+R[-17]C[9]+R[-17]C[12]+R[-17]C[15]+R[-17]C[18]+R[-17]C[21]+R[-17]C[24]+R[-17]C[27]+R[-17]C[30]+R[-17]C[33]+R[-17]C[36]+R[-17]C[39]+R[-6]C[-6]+R[-6]C[-3]+R[-6]C+R[-6]C[3]+R[-6]C[6]+R[-6]C[9]+R[-6]C[12]+R[-6]C[15]+R[-6]C[18]+R[-6]C[21]+R[-6]C[24]+R[-6]C[27]+R[-6]C[30]+R[-6]C[33]+R[-6]C[36]+R[-6]C[39]+R[1]C[-6]+R[1]C[-3]+R[1]C[3]+R[1]C[6]+R[1]C[9]+R[1]C[12]+R[1]C[15]+R[1]C[18]+R[1]C[21]+R[1]C[24]+R[1]C[27]+R[1]C[30]+R[1]C[33]+R[1]C[36]+R[1]C[39]+R[7]C[-6]+R[7]C[-3]+R[7]C[3]+R[7]C[6]+R[7]C[9]+R[7]C[12]+R[7]C[15]+R[7]C[18]+R[7]C[21]+R[7]C[24]+R[7]C[27]+R[7]C[30]+R[7]C[33]+R[7]C[36]=R[7]C[39]+R[13]C[-6]+R[13]C[-3]+R[13]C[3]+R[13]C[6]+R[13]C[9]+R[13]C[12]+R[13]C[15]+R[13]C[18]+R[13]C[21]+R[13]C[24]+R[13]C[27]+R[13]C[30]+R[13]C[33]+R[13]C[36]+R[13]C[39]+R[20]C[-6]+R[20]C[-3]+R[20]C+R[20]C[3]+R[20]C[6]+R[20]C[9]+R[20]C[12]+R[20]C[15]+R[20]C[18]+R[20]C[21])"
                [J64].FormulaR1C1 = "=SUM(R[20]C[24]+R[20]C[27]+R[20]C[30]+R[20]C[33]+R[20]C[36]+R[20]C[39]+R[27]C[-6]+R[27]C[-3]+R[27]C+R[27]C[3]+R[27]C[6]+R[27]C[9]+R[27]C[12]+R[27]C[15]+R[27]C[18]+R[27]C[21]+R[27]C[24]+R[27]C[27]+R[27]C[30]+R[27]C[33]+R[27]C[36]+R[27]C[39]+R[34]C[-6]+R[34]C[-3]+R[34]C+R[34]C[3]+R[34]C[6]+R[34]C[9]+R[34]C[12]+R[34]C[15]+R[34]C[18]+R[34]C[21]+R[34]C[24]+R[34]C[27]+R[34]C[30]+R[34]C[33]+R[34]C[36]+R[34]C[39]+R[42]C[-6]+R[42]C[-3]+R[42]C+R[42]C[3]+R[42]C[6]+R[42]C[9]+R[42]C[12]+R[42]C[15]+R[42]C[18]+R[42]C[21]+R[42]C[24]+R[42]C[27]+R[42]C[30]+R[42]C[33]+R[42]C[36]+R[42]C[39]+R[49]C[-6]+R[49]C[-3]+R[49]C+R[49]C[3]+R[49]C[6]+R[49]C[9]+R[49]C[12]+R[49]C[15]+R[49]C[18]+R[49]C[21]+R[49]C[24]+R[49]C[27]+R[49]C[30]+R[49]C[33]+R[49]C[36]+R[49]C[39]+R[56]C[-6]+R[56]C[-3]+R[56]C+R[56]C[3]+R[56]C[6]+R[56]C[9]+R[56]C[12]+R[56]C[15]+R[56]C[18]+R[56]C[21]+R[56]C[24]+R[56]C[27]+R[56]C[30]+R[56]C[33]+R[56]C[36]+R[56]C[39])"
                [K64].FormulaR1C1 = "=SUM(R[-47]C[-6]+R[-47]C[-3]+R[-47]C+R[-47]C[3]+R[-47]C[6]+R[-47]C[9]+R[-47]C[12]+R[-47]C[15]+R[-47]C[18]+R[-47]C[21]+R[-47]C[24]+R[-47]C[27]+R[-47]C[30]+R[-47]C[33]+R[-47]C[36]+R[-47]C[39]+R[-37]C[-6]+R[-37]C[-3]+R[-37]C+R[-37]C[3]+R[-37]C[6]+R[-37]C[9]+R[-37]C[12]+R[-37]C[15]+R[-37]C[18]+R[-37]C[21]+R[-37]C[24]+R[-37]C[27]+R[-37]C[30]+R[-37]C[33]+R[-37]C[36]+R[-37]C[39]+R[-26]C[-6]+R[-26]C[-3]+R[-26]C+R[-26]C[3]+R[-26]C[6]+R[-26]C[9]+R[-26]C[12]+R[-26]C[15]+R[-26]C[18]+R[-26]C[21]+R[-26]C[24]+R[-26]C[27]+R[-26]C[30]+R[-26]C[33]+R[-26]C[36]+R[-26]C[39]+R[-15]C[-6]+R[-15]C[-3]+R[-15]C+R[-15]C[3]+R[-15]C[6]+R[-15]C[9]+R[-15]C[12]+R[-15]C[15]+R[-15]C[18]+R[-15]C[21]+R[-15]C[24]+R[-15]C[27]+R[-15]C[30]+R[-15]C[33]+R[-15]C[36]+R[-15]C[39]+R[-4]C[-6]+R[-4]C[-3]+R[-4]C+R[-4]C[3]+R[-4]C[6]+R[-4]C[9]+R[-4]C[12]+R[-4]C[15]+R[-4]C[18]+R[-4]C[21]+R[-4]C[24]+R[-4]C[27]+R[-4]C[30]+R[-4]C[33]+R[-4]C[36]+R[-4]C[39]+R[3]C[-6]+R[3]C[-3]+R[3]C[3])"
                [K64].FormulaR1C1 = "=SUM(R[3]C[6]+R[3]C[9]+R[3]C[12]+R[3]C[15]+R[3]C[18]+R[3]C[21]+R[3]C[24]+R[3]C[27]+R[3]C[30]+R[3]C[33]+R[3]C[36]+R[3]C[39]+R[9]C[-6]+R[9]C[-3]+R[9]C[3]+R[9]C[6]+R[9]C[9]+R[9]C[12]+R[9]C[15]+R[9]C[18]+R[9]C[21]+R[9]C[24]+R[9]C[27]+R[9]C[30]+R[9]C[33]+R[9]C[36]+R[9]C[39]+R[15]C[-6]+R[15]C[-3]+R[15]C[3]+R[15]C[6]+R[15]C[9]+R[15]C[12]+R[15]C[15]+R[15]C[18]+R[15]C[21])"
                [K64].FormulaR1C1 = "=SUM(R[15]C[24]+R[15]C[27]+R[15]C[30]+R[15]C[33]+R[15]C[36]+R[15]C[39]+R[22]C[-6]+R[22]C[-3]+R[22]C+R[22]C[3]+R[22]C[6]+R[22]C[9]+R[22]C[12]+R[22]C[15]+R[22]C[18]+R[22]C[21]+R[22]C[24]+R[22]C[27]+R[22]C[30]+R[22]C[33]+R[22]C[36]+R[22]C[39]+R[29]C[-6]+R[29]C[-3]+R[29]C+R[29]C[3]+R[29]C[6]+R[29]C[9]+R[29]C[12]+R[29]C[15]+R[29]C[18]+R[29]C[21]+R[29]C[24]+R[29]C[27]+R[29]C[30]+R[29]C[33]+R[29]C[36]+R[29]C[39]+R[36]C[-6]+R[36]C[-3]+R[36]C+R[36]C[3]+R[36]C[6]+R[36]C[9]+R[36]C[12]+R[36]C[15]+R[36]C[18]+R[36]C[21]+R[36]C[24]+R[36]C[27]+R[36]C[30]+R[36]C[33]+R[36]C[36]+R[36]C[39]+R[44]C[-6]+R[44]C[-3]+R[44]C+R[44]C[3]+R[44]C[6]+R[44]C[9]+R[44]C[12]+R[44]C[15]+R[44]C[18]+R[44]C[21]+R[44]C[24]+R[44]C[27]+R[44]C[30]+R[44]C[33]+R[44]C[36]+R[44]C[39]+R[51]C[-6]+R[51]C[-3]+R[51]C+R[51]C[3]+R[51]C[6]+R[51]C[9]+R[51]C[12]+R[51]C[15]+R[51]C[18]+R[51]C[21]+R[51]C[24]+R[51]C[27]+R[51]C[30]+R[51]C[33]+R[51]C[36])"
                [K64].FormulaR1C1 = "=SUM(R[51]C[39]+R[58]C[-6]+R[58]C[-3]+R[58]C+R[58]C[3]+R[58]C[6]+R[58]C[9]+R[58]C[12]+R[58]C[15]+R[58]C[18]+R[58]C[21]+R[58]C[24]+R[58]C[27]+R[58]C[30]+R[58]C[33]+R[58]C[36]+R[58]C[39])"
                [B65] = "SEGUNDA"
            ElseIf ActiveSheet.Range("B66").Value = 2 Then
                [J66].FormulaR1C1 = "=SUM(R[-49]C[-6]+R[-49]C[-3]+R[-49]C+R[-49]C[3]+R[-49]C[6]+R[-49]C[9]+R[-49]C[12]+R[-49]C[15]+R[-49]C[18]+R[-49]C[21]+R[-49]C[24]+R[-49]C[27]+R[-49]C[30]+R[-49]C[33]+R[-49]C[36]+R[-49]C[39]+R[-39]C[-6]+R[-39]C[-3]+R[-39]C+R[-39]C[3]+R[-39]C[6]+R[-39]C[9]+R[-39]C[12]+R[-39]C[15]+R[-39]C[18]+R[-39]C[21]+R[-39]C[24]+R[-39]C[27]+R[-39]C[30]+R[-39]C[33]+R[-39]C[36]+R[-39]C[39]+R[-28]C[-6]+R[-28]C[-3]+R[-28]C+R[-28]C[3]+R[-28]C[6]+R[-28]C[9]+R[-28]C[12]+R[-28]C[15]+R[-28]C[18]+R[-28]C[21]+R[-28]C[24]+R[-28]C[27]+R[-28]C[30]+R[-28]C[33]+R[-28]C[36]+R[-28]C[39]+R[-17]C[-6]+R[-17]C[-3]+R[-17]C+R[-17]C[3]+R[-17]C[6]+R[-17]C[9]+R[-17]C[12]+R[-17]C[15]+R[-17]C[18]+R[-17]C[21]+R[-17]C[24]+R[-17]C[27]+R[-17]C[30]+R[-17]C[33]+R[-17]C[36]+R[-17]C[39]+R[-6]C[-6]+R[-6]C[-3]+R[-6]C+R[-6]C[3]+R[-6]C[6]+R[-6]C[9]+R[-6]C[12]+R[-6]C[15]+R[-6]C[18]+R[-6]C[21]+R[-6]C[24]+R[-6]C[27]+R[-6]C[30]+R[-6]C[33]+R[-6]C[36]+R[-6]C[39]+R[1]C[-6]+R[1]C[-3])"
                [J66].FormulaR1C1 = "=SUM(R[1]C[3]+R[1]C[6]+R[1]C[9]+R[1]C[12]+R[1]C[15]+R[1]C[18]+R[1]C[21]+R[1]C[24]+R[1]C[27]+R[1]C[30]+R[1]C[33]+R[1]C[36]+R[1]C[39]+R[7]C[-6]+R[7]C[-3]+R[7]C[3]+R[7]C[6]+R[7]C[9]+R[7]C[12]+R[7]C[15]+R[7]C[18]+R[7]C[21]+R[7]C[24]+R[7]C[27]+R[7]C[30]+R[7]C[33]+R[7]C[36]+R[7]C[39]+R[13]C[-6]+R[13]C[-3]+R[13]C[3]+R[13]C[6]+R[13]C[9]+R[13]C[12]+R[13]C[15]+R[13]C[18]+R[13]C[21]+R[13]C[24]+R[13]C[27]+R[13]C[30]+R[13]C[33]+R[13]C[36]+R[13]C[39]+R[20]C[-6]+R[20]C[-3]+R[20]C+R[20]C[3]+R[20]C[6]+R[20]C[9]+R[20]C[12]+R[20]C[15]+R[20]C[18]+R[20]C[21]+R[20]C[24]+R[20]C[27]+R[20]C[30]+R[20]C[33]+R[20]C[36]+R[20]C[39]+R[27]C[-6]+R[27]C[-3]+R[27]C+R[27]C[3]+R[27]C[6]+R[27]C[9]+R[27]C[12]+R[27]C[15]+R[27]C[18]+R[27]C[21]+R[27]C[24]+R[27]C[27]+R[27]C[30]+R[27]C[33]+R[27]C[36]+R[27]C[39]+R[34]C[-6]+R[34]C[-3]+R[34]C+R[34]C[3]+R[34]C[6]+R[34]C[9]+R[34]C[12]+R[34]C[15]+R[34]C[18]+R[34]C[21]+R[34]C[24]+R[34]C[27]+R[34]C[30]+R[34]C[33]+R[34]C[36]+R[34]C[39])"
                [J66].FormulaR1C1 = "=SUM(R[42]C[-6]+R[42]C[-3]+R[42]C+R[42]C[3]+R[42]C[6]+R[42]C[9]+R[42]C[12]+R[42]C[15]+R[42]C[18]+R[42]C[21]+R[42]C[24]+R[42]C[27]+R[42]C[30]+R[42]C[33]+R[42]C[36]+R[42]C[39]+R[49]C[-6]+R[49]C[-3]+R[49]C+R[49]C[3]+R[49]C[6]+R[49]C[9]+R[49]C[12]+R[49]C[15]+R[49]C[18]+R[49]C[21]+R[49]C[24]+R[49]C[27]+R[49]C[30]+R[49]C[33]+R[49]C[36]+R[49]C[39]+R[56]C[-6]+R[56]C[-3]+R[56]C+R[56]C[3]+R[56]C[6]+R[56]C[9]+R[56]C[12]+R[56]C[15]+R[56]C[18]+R[56]C[21]+R[56]C[24]+R[56]C[27]+R[56]C[30]+R[56]C[33]+R[56]C[36]+R[56]C[39])"
                [K66].FormulaR1C1 = "=SUM(R[-49]C[-6]+R[-49]C[-3]+R[-49]C+R[-49]C[3]+R[-49]C[6]+R[-49]C[9]+R[-49]C[12]+R[-49]C[15]+R[-49]C[18]+R[-49]C[21]+R[-49]C[24]+R[-49]C[27]+R[-49]C[30]+R[-49]C[33]+R[-49]C[36]+R[-49]C[39]+R[-39]C[-6]+R[-39]C[-3]+R[-39]C+R[-39]C[3]+R[-39]C[6]+R[-39]C[9]+R[-39]C[12]+R[-39]C[15]+R[-39]C[18]+R[-39]C[21]+R[-39]C[24]+R[-39]C[27]+R[-39]C[30]+R[-39]C[33]+R[-39]C[36]+R[-39]C[39]+R[-28]C[-6]+R[-28]C[-3]+R[-28]C+R[-28]C[3]+R[-28]C[6]+R[-28]C[9]+R[-28]C[12]+R[-28]C[15]+R[-28]C[18]+R[-28]C[21]+R[-28]C[24]+R[-28]C[27]+R[-28]C[30]+R[-28]C[33]+R[-28]C[36]+R[-28]C[39]+R[-17]C[-6]+R[-17]C[-3]+R[-17]C+R[-17]C[3])"
                [K66].FormulaR1C1 = "=SUM(R[-17]C[6]+R[-17]C[9]+R[-17]C[12]+R[-17]C[15]+R[-17]C[18]+R[-17]C[21]+R[-17]C[24]+R[-17]C[27]+R[-17]C[30]+R[-17]C[33]+R[-17]C[36]+R[-17]C[39]+R[-6]C[-6]+R[-6]C[-3]+R[-6]C+R[-6]C[3]+R[-6]C[6]+R[-6]C[9]+R[-6]C[12]+R[-6]C[15]+R[-6]C[18]+R[-6]C[21]+R[-6]C[24]+R[-6]C[27]+R[-6]C[30]+R[-6]C[33]+R[-6]C[36]+R[-6]C[39]+R[1]C[-6]+R[1]C[-3]+R[1]C[3]+R[1]C[6]+R[1]C[9]+R[1]C[12]+R[1]C[15]+R[1]C[18]+R[1]C[21]+R[1]C[24]+R[1]C[27]+R[1]C[30]+R[1]C[33]+R[1]C[36]+R[1]C[39]+R[7]C[-6]+R[7]C[-3]+R[7]C[3]+R[7]C[6]+R[7]C[9]+R[7]C[12]+R[7]C[15]+R[7]C[18]+R[7]C[21]+R[7]C[24]+R[7]C[27]+R[7]C[30]+R[7]C[33]+R[7]C[36])"
                [K66].FormulaR1C1 = "=SUM(R[7]C[39]+R[13]C[-6]+R[13]C[-3]+R[13]C[3]+R[13]C[6]+R[13]C[9]+R[13]C[12]+R[13]C[15]+R[13]C[18]+R[13]C[21]+R[13]C[24]+R[13]C[27]+R[13]C[30]+R[13]C[33]+R[13]C[36]+R[13]C[39]+R[20]C[-6]+R[20]C[-3]+R[20]C+R[20]C[3]+R[20]C[6]+R[20]C[9]+R[20]C[12]+R[20]C[15]+R[20]C[18]+R[20]C[21]+R[20]C[24]+R[20]C[27]+R[20]C[30]+R[20]C[33]+R[20]C[36]+R[20]C[39]+R[27]C[-6]+R[27]C[-3]+R[27]C+R[27]C[3]+R[27]C[6]+R[27]C[9]+R[27]C[12]+R[27]C[15]+R[27]C[18]+R[27]C[21]+R[27]C[24]+R[27]C[27]+R[27]C[30]=R[27]C[33]+R[27]C[36]+R[27]C[39]+R[34]C[-6]+R[34]C[-3]+R[34]C+R[34]C[3]+R[34]C[6]+R[34]C[9]+R[34]C[12]+R[34]C[15]+R[34]C[18]+R[34]C[21]+R[34]C[24]+R[34]C[27]+R[34]C[30]+R[34]C[33]+R[34]C[36]+R[34]C[39]+R[42]C[-6]+R[42]C[-3]+R[42]C+R[42]C[3]+R[42]C[6]+R[42]C[9]+R[42]C[12]+R[42]C[15]+R[42]C[18]+R[42]C[21]+R[42]C[24]+R[42]C[27]+R[42]C[30]+R[42]C[33]+R[42]C[36])"
                [K66].FormulaR1C1 = "=SUM(R[42]C[39]+R[49]C[-6]+R[49]C[-3]+R[49]C+R[49]C[3]+R[49]C[6]+R[49]C[9]+R[49]C[12]+R[49]C[15]+R[49]C[18]+R[49]C[21]+R[49]C[24]+R[49]C[27]+R[49]C[30]+R[49]C[33]+R[49]C[36]+R[49]C[39]+R[56]C[-6]+R[56]C[-3]+R[56]C+R[56]C[3]+R[56]C[6]+R[56]C[9]+R[56]C[12]+R[56]C[15]+R[56]C[18]+R[56]C[21]+R[56]C[24]+R[56]C[27]+R[56]C[30]+R[56]C[33]+R[56]C[36]+R[56]C[39])"
                [B65] = "TERA"
            ElseIf ActiveSheet.Range("B66").Value = 3 Then
                [J68].FormulaR1C1 = "=SUM(R[-51]C[-6]+R[-51]C[-3]+R[-51]C+R[-51]C[3]+R[-51]C[6]+R[-51]C[9]+R[-51]C[12]+R[-51]C[15]+R[-51]C[18]+R[-51]C[21]+R[-51]C[24]+R[-51]C[27]+R[-51]C[30]+R[-51]C[33]+R[-51]C[36]+R[-51]C[39]+R[-41]C[-6]+R[-41]C[-3]+R[-41]C+R[-41]C[3]+R[-41]C[6]+R[-41]C[9]+R[-41]C[12]+R[-41]C[15]+R[-41]C[18]+R[-41]C[21]+R[-41]C[24]+R[-41]C[27]+R[-41]C[30]+R[-41]C[33]+R[-41]C[36]+R[-41]C[39]+R[-30]C[-6]+R[-30]C[-3]+R[-30]C+R[-30]C[3]+R[-30]C[6]+R[-30]C[9]+R[-30]C[12]+R[-30]C[15]+R[-30]C[18]+R[-30]C[21]+R[-30]C[24])"
                [J68].FormulaR1C1 = "=SUM(R[-30]C[27]+R[-30]C[30]+R[-30]C[33]+R[-30]C[36]+R[-30]C[39]+R[-19]C[-6]+R[-19]C[-3]+R[-19]C+R[-19]C[3]+R[-19]C[6]+R[-19]C[9]+R[-19]C[12]+R[-19]C[15]+R[-19]C[18]+R[-19]C[21]+R[-19]C[24]+R[-19]C[27]+R[-19]C[30]+R[-19]C[33]+R[-19]C[36]+R[-19]C[39]+R[-8]C[-6]+R[-8]C[-3]+R[-8]C+R[-8]C[3]+R[-8]C[6]+R[-8]C[9]+R[-8]C[12]+R[-8]C[15]+R[-8]C[18]+R[-8]C[21]+R[-8]C[24]+R[-8]C[27]+R[-8]C[30]+R[-8]C[33]+R[-8]C[36]+R[-8]C[39]+R[-1]C[-6]+R[-1]C[-3]+R[-1]C[3]+R[-1]C[6]+R[-1]C[9]+R[-1]C[12]+R[-1]C[15]+R[-1]C[18]+R[-1]C[21]+R[-1]C[24])"
                [J68].FormulaR1C1 = "=SUM(R[-1]C[27]+R[-1]C[30]+R[-1]C[33]+R[-1]C[36]+R[-1]C[39]+R[5]C[-6]+R[5]C[-3]+R[5]C[3]+R[5]C[6]+R[5]C[9]+R[5]C[12]+R[5]C[15]+R[5]C[18]+R[5]C[21]+R[5]C[24]+R[5]C[27]+R[5]C[30]+R[5]C[33]+R[5]C[36]+R[5]C[39]+R[11]C[-6]+R[11]C[-3]+R[11]C[3]+R[11]C[6]+R[11]C[9]+R[11]C[12]+R[11]C[15]+R[11]C[18]+R[11]C[21]+R[11]C[24]+R[11]C[27]+R[11]C[30]+R[11]C[33]+R[11]C[36]+R[11]C[39]+R[18]C[-6]+R[18]C[-3]+R[18]C+R[18]C[3]+R[18]C[6]+R[18]C[9]+R[18]C[12]+R[18]C[15]+R[18]C[18]+R[18]C[21]+R[18]C[24]+R[18]C[27]+R[18]C[30]+R[18]C[33]+R[18]C[36])"
                [J68].FormulaR1C1 = "=SUM(R[18]C[39]+R[25]C[-6]+R[25]C[-3]+R[25]C+R[25]C[3]+R[25]C[6]+R[25]C[9]+R[25]C[12]+R[25]C[15]+R[25]C[18]+R[25]C[21]+R[25]C[24]+R[25]C[27]+R[25]C[30]+R[25]C[33]+R[25]C[36]+R[25]C[39]+R[32]C[-6]+R[32]C[-3]+R[32]C+R[32]C[3]+R[32]C[6]+R[32]C[9]+R[32]C[12]+R[32]C[15]+R[32]C[18]+R[32]C[21]+R[32]C[24]+R[32]C[27]+R[32]C[30]+R[32]C[33]+R[32]C[36]+R[32]C[39]+R[40]C[-6]+R[40]C[-3]+R[40]C+R[40]C[3]+R[40]C[6]+R[40]C[9]+R[40]C[12]+R[40]C[15]+R[40]C[18]+R[40]C[21]+R[40]C[24]+R[40]C[27]+R[40]C[30]+R[40]C[33]+R[40]C[36]+R[40]C[39]+R[47]C[-6]+R[47]C[-3]+R[47]C+R[47]C[3]+R[47]C[6]+R[47]C[9]+R[47]C[12]+R[47]C[15]+R[47]C[18]+R[47]C[21]+R[47]C[24]+R[47]C[27]+R[47]C[30]+R[47]C[33]+R[47]C[36]+R[47]C[39]+R[54]C[-6]+R[54]C[-3]+R[54]C+R[54]C[3]+R[54]C[6]+R[54]C[9]+R[54]C[12]+R[54]C[15]+R[54]C[18]+R[54]C[21]+R[54]C[24]+R[54]C[27]+R[54]C[30]+R[54]C[33]+R[54]C[36]+R[54]C[39])"
                [K68].FormulaR1C1 = "=SUM(R[-51]C[-6]+R[-51]C[-3]+R[-51]C+R[-51]C[3]+R[-51]C[6]+R[-51]C[9]+R[-51]C[12]+R[-51]C[15]+R[-51]C[18]+R[-51]C[21]+R[-51]C[24]+R[-51]C[27]+R[-51]C[30]+R[-51]C[33]+R[-51]C[36]+R[-51]C[39]+R[-41]C[-6]+R[-41]C[-3]+R[-41]C+R[-41]C[3]+R[-41]C[6]+R[-41]C[9]+R[-41]C[12]+R[-41]C[15]+R[-41]C[18]+R[-41]C[21]+R[-41]C[24]+R[-41]C[27]+R[-41]C[30]+R[-41]C[33]+R[-41]C[36]+R[-41]C[39]+R[-30]C[-6]+R[-30]C[-3]+R[-30]C+R[-30]C[3]+R[-30]C[6]+R[-30]C[9]+R[-30]C[12]+R[-30]C[15]+R[-30]C[18]+R[-30]C[21]+R[-30]C[24]+R[-30]C[27])"
                [K68].FormulaR1C1 = "=SUM(R[-30]C[30]+R[-30]C[33]+R[-30]C[36]+R[-30]C[39]+R[-19]C[-6]+R[-19]C[-3]+R[-19]C+R[-19]C[3]+R[-19]C[6]+R[-19]C[9]+R[-19]C[12]+R[-19]C[15]+R[-19]C[18]+R[-19]C[21]+R[-19]C[24]+R[-19]C[27]+R[-19]C[30]+R[-19]C[33]+R[-19]C[36]+R[-19]C[39]+R[-8]C[-6]+R[-8]C[-3]+R[-8]C+R[-8]C[3]+R[-8]C[6]+R[-8]C[9]+R[-8]C[12]+R[-8]C[15]+R[-8]C[18]+R[-8]C[21]+R[-8]C[24]+R[-8]C[27]+R[-8]C[30]+R[-8]C[33]+R[-8]C[36]+R[-8]C[39]+R[-1]C[-6]+R[-1]C[-3]+R[-1]C[3]+R[-1]C[6]+R[-1]C[9]+R[-1]C[12]+R[-1]C[15]+R[-1]C[18]+R[-1]C[21]+R[-1]C[24])"
                [K68].FormulaR1C1 = "=SUM(R[-1]C[27]+R[-1]C[30]+R[-1]C[33]+R[-1]C[36]+R[-1]C[39]+R[5]C[-6]+R[5]C[-3]+R[5]C[3]+R[5]C[6]+R[5]C[9]+R[5]C[12]+R[5]C[15]+R[5]C[18]+R[5]C[21]+R[5]C[24]+R[5]C[27]+R[5]C[30]+R[5]C[33]+R[5]C[36]+R[5]C[39]+R[11]C[-6]+R[11]C[-3]+R[11]C[3]+R[11]C[6]+R[11]C[9]+R[11]C[12]+R[11]C[15]+R[11]C[18]+R[11]C[21]+R[11]C[24]+R[11]C[27]+R[11]C[30]+R[11]C[33]+R[11]C[36]+R[11]C[39]+R[18]C[-6]+R[18]C[-3]+R[18]C+R[18]C[3]+R[18]C[6]+R[18]C[9]+R[18]C[12]+R[18]C[15]+R[18]C[18]+R[18]C[21]+R[18]C[24]+R[18]C[27]+R[18]C[30]+R[18]C[33])"
                [K68].FormulaR1C1 = "=SUM(R[18]C[36]+R[18]C[39]+R[25]C[-6]+R[25]C[-3]+R[25]C+R[25]C[3]+R[25]C[6]+R[25]C[9]+R[25]C[12]+R[25]C[15]+R[25]C[18]+R[25]C[21]+R[25]C[24]+R[25]C[27]+R[25]C[30]+R[25]C[33]+R[25]C[36]+R[25]C[39]+R[32]C[-6]+R[32]C[-3]+R[32]C+R[32]C[3]+R[32]C[6]+R[32]C[9]+R[32]C[12]+R[32]C[15]+R[32]C[18]+R[32]C[21]+R[32]C[24]+R[32]C[27]+R[32]C[30]+R[32]C[33]+R[32]C[36]+R[32]C[39]+R[40]C[-6]+R[40]C[-3]+R[40]C+R[40]C[3]+R[40]C[6]+R[40]C[9]+R[40]C[12]+R[40]C[15]+R[40]C[18]+R[40]C[21]+R[40]C[24]+R[40]C[27]+R[40]C[30]+R[40]C[33]+R[40]C[36]+R[40]C[39]+R[47]C[-6]+R[47]C[-3]+R[47]C+R[47]C[3]+R[47]C[6]+R[47]C[9]+R[47]C[12]+R[47]C[15]+R[47]C[18]+R[47]C[21]+R[47]C[24]+R[47]C[27]+R[47]C[30]+R[47]C[33]+R[47]C[36]+R[47]C[39]+R[54]C[-6]+R[54]C[-3]+R[54]C+R[54]C[3]+R[54]C[6]+R[54]C[9]+R[54]C[12]+R[54]C[15]+R[54]C[18]+R[54]C[21]+R[54]C[24]+R[54]C[27]+R[54]C[30]+R[54]C[33]+R[54]C[36]+R[54]C[39])"
                [B65] = "QUARTA"
            ElseIf ActiveSheet.Range("B66").Value = 4 Then
                [J70].FormulaR1C1 = "=SUM(R[-53]C[-6]+R[-53]C[-3]+R[-53]C+R[-53]C[3]+R[-53]C[6]+R[-53]C[9]+R[-53]C[12]+R[-53]C[15]+R[-53]C[18]+R[-53]C[21]+R[-53]C[24]+R[-53]C[27]+R[-53]C[30]+R[-53]C[33]+R[-53]C[36]+R[-53]C[39]+R[-43]C[-6]+R[-43]C[-3]+R[-43]C+R[-43]C[3]+R[-43]C[6]+R[-43]C[9]+R[-43]C[12]+R[-43]C[15]+R[-43]C[18]+R[-43]C[21]+R[-43]C[24]+R[-43]C[27]+R[-43]C[30]+R[-43]C[33]+R[-43]C[36]+R[-43]C[39]+R[-32]C[-6]+R[-32]C[-3]+R[-32]C+R[-32]C[3]+R[-32]C[6]+R[-32]C[9]+R[-32]C[12])"
                [J70].FormulaR1C1 = "=SUM(R[-32]C[15]+R[-32]C[18]+R[-32]C[21]+R[-32]C[24]+R[-32]C[27]+R[-32]C[30]+R[-32]C[33]+R[-32]C[36]+R[-32]C[39]+R[-21]C[-6]+R[-21]C[-3]+R[-21]C+R[-21]C[3]+R[-21]C[6]+R[-21]C[9]+R[-21]C[12]+R[-21]C[15]+R[-21]C[18]+R[-21]C[21]+R[-21]C[24]+R[-21]C[27]+R[-21]C[30]+R[-21]C[33]+R[-21]C[36]+R[-21]C[39]+R[-10]C[-6]+R[-10]C[-3]+R[-10]C+R[-10]C[3]+R[-10]C[6]+R[-10]C[9]+R[-10]C[12]+R[-10]C[15]+R[-10]C[18]+R[-10]C[21]+R[-10]C[24]+R[-10]C[27]+R[-10]C[30]+R[-10]C[33]+R[-10]C[36]+R[-10]C[39]+R[-3]C[-6]+R[-3]C[-3]+R[-3]C[3]+R[-3]C[6]+R[-3]C[9]+R[-3]C[12]+R[-3]C[15]+R[-3]C[18])"
                [J70].FormulaR1C1 = "=SUM(R[-3]C[21]+R[-3]C[24]+R[-3]C[27]+R[-3]C[30]+R[-3]C[33]+R[-3]C[36]+R[-3]C[39]+R[3]C[-6]+R[3]C[-3]+R[3]C[3]+R[3]C[6]+R[3]C[9]+R[3]C[12]+R[3]C[15]+R[3]C[18]+R[3]C[21]+R[3]C[24]+R[3]C[27]+R[3]C[30]+R[3]C[33]+R[3]C[36]+R[3]C[39]+R[9]C[-6]+R[9]C[-3]+R[9]C[3]+R[9]C[6]+R[9]C[9]+R[9]C[12]+R[9]C[15]+R[9]C[18]+R[9]C[21]+R[9]C[24]+R[9]C[27]+R[9]C[30]+R[9]C[33]+R[9]C[36]+R[9]C[39]+R[16]C[-6]+R[16]C[-3]+R[16]C+R[16]C[3]+R[16]C[6]+R[16]C[9]+R[16]C[12]+R[16]C[15]+R[16]C[18]+R[16]C[21]+R[16]C[24]+R[16]C[27]+R[16]C[30]+R[16]C[33]+R[16]C[36]+R[16]C[39]+R[23]C[-6]+R[23]C[-3])"
                [J70].FormulaR1C1 = "=SUM(R[23]C+R[23]C[3]+R[23]C[6]+R[23]C[9]+R[23]C[12]+R[23]C[15]+R[23]C[18]+R[23]C[21]+R[23]C[24]+R[23]C[27]+R[23]C[30]+R[23]C[33]+R[23]C[36]+R[23]C[39]+R[30]C[-6]+R[30]C[-3]+R[30]C+R[30]C[3]+R[30]C[6]+R[30]C[9]+R[30]C[12]+R[30]C[15]+R[30]C[18]+R[30]C[21]+R[30]C[24]+R[30]C[27]+R[30]C[30]+R[30]C[33]+R[30]C[36]+R[30]C[39]+R[38]C[-6]+R[38]C[-3]+R[38]C+R[38]C[3]+R[38]C[6]+R[38]C[9]+R[38]C[12]+R[-60]C[16]+R[38]C[15]+R[38]C[18]+R[38]C[21]+R[38]C[24]+R[38]C[27]+R[38]C[30]+R[38]C[33]+R[38]C[36]+R[38]C[39]+R[45]C[-6]+R[45]C[-3]+R[45]C+R[45]C[3]+R[45]C[6]+R[45]C[9]+R[45]C[12]+R[45]C[15]+R[45]C[18]+R[45]C[21]+R[45]C[24]+R[45]C[27]+R[45]C[30]+R[45]C[33]+R[45]C[36]+R[45]C[39]+R[52]C[-6]+R[52]C[-3]+R[52]C+R[52]C[3]+R[52]C[6]+R[52]C[9]+R[52]C[12]+R[52]C[15]+R[52]C[18]+R[52]C[21]+R[52]C[24]+R[52]C[27]+R[52]C[30]+R[52]C[33]+R[52]C[36]+R[52]C[39])"
                [K70].FormulaR1C1 = "=SUM(R[-53]C[-6]+R[-53]C[-3]+R[-53]C+R[-53]C[3]+R[-53]C[6]+R[-53]C[9]+R[-53]C[12]+R[-53]C[15]+R[-53]C[18]+R[-53]C[21]+R[-53]C[24]+R[-53]C[27]+R[-53]C[30]+R[-53]C[33]+R[-53]C[36]+R[-53]C[39]+R[-43]C[-6]+R[-43]C[-3]+R[-43]C+R[-43]C[3]+R[-43]C[6]+R[-43]C[9]+R[-43]C[12]+R[-43]C[15]+R[-43]C[18]+R[-43]C[21]+R[-43]C[24]+R[-43]C[27]+R[-43]C[30]+R[-43]C[33]+R[-43]C[36]+R[-43]C[39]+R[-32]C[-6]+R[-32]C[-3]+R[-32]C+R[-32]C[3]+R[-32]C[6]+R[-32]C[9]+R[-32]C[12]+R[-32]C[15]+R[-32]C[18]+R[-32]C[21]+R[-32]C[24]+R[-32]C[27]+R[-32]C[30]+R[-32]C[33]+R[-32]C[36]+R[-32]C[39])"
                [K70].FormulaR1C1 = "=SUM(R[-21]C[-6]+R[-21]C[-3]+R[-21]C+R[-21]C[3]+R[-21]C[6]+R[-21]C[9]+R[-21]C[12]+R[-21]C[15]+R[-21]C[18]+R[-21]C[21]+R[-21]C[24]+R[-21]C[27]+R[-21]C[30]+R[-21]C[33]+R[-21]C[36]+R[-21]C[39]+R[-10]C[-6]+R[-10]C[-3]+R[-10]C+R[-10]C[3]+R[-10]C[6]+R[-10]C[9]+R[-10]C[12]+R[-10]C[15]+R[-10]C[18]+R[-10]C[21]+R[-10]C[24]+R[-10]C[27]+R[-10]C[30]+R[-10]C[33]+R[-10]C[36]+R[-10]C[39]+R[-3]C[-6]+R[-3]C[-3]+R[-3]C[3]+R[-3]C[6]+R[-3]C[9]+R[-3]C[12]+R[-3]C[15]+R[-3]C[18])"
                [K70].FormulaR1C1 = "=SUM(R[-3]C[21]+R[-3]C[24]+R[-3]C[27]+R[-3]C[30]+R[-3]C[33]+R[-3]C[36]+R[-3]C[39]+R[3]C[-6]+R[3]C[-3]+R[3]C[3]+R[3]C[6]+R[3]C[9]+R[3]C[12]+R[3]C[15]+R[3]C[18]+R[3]C[21]+R[3]C[24]+R[3]C[27]+R[3]C[30]+R[3]C[33]+R[3]C[36]+R[3]C[39]+R[9]C[-6]+R[9]C[-3]+R[9]C[3]+R[9]C[6]+R[9]C[9]+R[9]C[12]+R[9]C[15]+R[9]C[18]+R[9]C[21]+R[9]C[24]+R[9]C[27]+R[9]C[30]+R[9]C[33]+R[9]C[36]+R[9]C[39]+R[16]C[-6]+R[16]C[-3]+R[16]C+R[16]C[3]+R[16]C[6]+R[16]C[9]+R[16]C[12]+R[16]C[15]+R[16]C[18]+R[16]C[21]+R[16]C[24]+R[16]C[27]+R[16]C[30]+R[16]C[33]+R[16]C[36]+R[16]C[39]+R[23]C[-6]+R[23]C[-3])"
                [K70].FormulaR1C1 = "=SUM(R[23]C+R[23]C[3]+R[23]C[6]+R[23]C[9]+R[23]C[12]+R[23]C[15]+R[23]C[18]+R[23]C[21]+R[23]C[24]+R[23]C[27]+R[23]C[30]+R[23]C[33]+R[23]C[36]+R[23]C[39]+R[30]C[-6]+R[30]C[-3]+R[30]C+R[30]C[3]+R[30]C[6]+R[30]C[9]+R[30]C[12]+R[30]C[15]+R[30]C[18]+R[30]C[21]+R[30]C[24]+R[30]C[27]+R[30]C[30]+R[30]C[33]+R[30]C[36]+R[30]C[39]+R[38]C[-6]+R[38]C[-3]+R[38]C+R[38]C[3]+R[38]C[6]+R[38]C[9]+R[38]C[12]+R[38]C[15]+R[38]C[18]+R[38]C[21]+R[38]C[24]+R[38]C[27]+R[38]C[30]+R[38]C[33]+R[38]C[36]+R[38]C[39]+R[45]C[-6]+R[45]C[-3]+R[45]C+R[45]C[3]+R[45]C[6]+R[45]C[9]+R[45]C[12]+R[45]C[15]+R[45]C[18]+R[45]C[21]+R[45]C[24]+R[45]C[27]+R[45]C[30]+R[45]C[33]+R[45]C[36]+R[45]C[39]+R[52]C[-6]+R[52]C[-3]+R[52]C+R[52]C[3]+R[52]C[6]+R[52]C[9]+R[52]C[12]+R[52]C[15]+R[52]C[18]+R[52]C[21]+R[52]C[24]+R[52]C[27]+R[52]C[30]+R[52]C[33]+R[52]C[36]+R[52]C[39])"
                [B65] = "QUINTA"
            ElseIf ActiveSheet.Range("B66").Value = 5 Then
                [J72].FormulaR1C1 = "=SUM(R[-55]C[-6]+R[-55]C[-3]+R[-55]C+R[-55]C[3]+R[-55]C[6]+R[-55]C[9]+R[-55]C[12]+R[-55]C[15]+R[-55]C[18]+R[-55]C[21]+R[-55]C[24]+R[-55]C[27]+R[-55]C[30]+R[-55]C[33]+R[-55]C[36]+R[-55]C[39]+R[-45]C[-6]+R[-45]C[-3]+R[-45]C+R[-45]C[3]+R[-45]C[6]+R[-45]C[9]+R[-45]C[12]+R[-45]C[15]+R[-45]C[18]+R[-45]C[21]+R[-45]C[24]+R[-45]C[27]+R[-45]C[30]+R[-45]C[33]+R[-45]C[36]+R[-34]C[-6]+R[-34]C[-3]+R[-34]C+R[-34]C[3]+R[-34]C[6]+R[-34]C[9]+R[-34]C[12]+R[-34]C[15]+R[-34]C[18]+R[-34]C[21]+R[-34]C[24])"
                [J72].FormulaR1C1 = "=SUM(R[-34]C[27]+R[-34]C[30]+R[-34]C[33]+R[-34]C[36]+R[-34]C[39]+R[-23]C[-6]+R[-23]C[-3]+R[-23]C+R[-23]C[3]+R[-23]C[6]+R[-23]C[9]+R[-23]C[12]+R[-23]C[15]+R[-23]C[18]+R[-23]C[21]+R[-23]C[24]+R[-23]C[27]+R[-23]C[30]+R[-23]C[33]+R[-23]C[36]+R[-23]C[39]+R[-12]C[-6]+R[-12]C[-3]+R[-12]C+R[-12]C[3]+R[-12]C[6]+R[-12]C[9]+R[-12]C[12]+R[-12]C[15]+R[-12]C[18]+R[-12]C[21]+R[-12]C[24]+R[-12]C[27]+R[-12]C[30]+R[-12]C[33]+R[-12]C[36]+R[-12]C[39]+R[-5]C[-6]+R[-5]C[-3]+R[-5]C[3]+R[-5]C[6]+R[-5]C[9]+R[-5]C[12]+R[-5]C[15]+R[-5]C[18]+R[-5]C[21])"
                [J72].FormulaR1C1 = "=SUM(R[-5]C[24]+R[-5]C[27]+R[-5]C[30]+R[-5]C[33]+R[-5]C[36]+R[-5]C[39]+R[1]C[-6]+R[1]C[-3]+R[1]C[3]+R[1]C[6]+R[1]C[9]+R[1]C[12]+R[1]C[15]+R[1]C[18]+R[1]C[21]+R[1]C[24]+R[1]C[27]+R[1]C[30]+R[1]C[33]+R[1]C[36]+R[1]C[39]+R[7]C[-6]+R[7]C[-3]+R[7]C[3]+R[7]C[6]+R[7]C[9]+R[7]C[12]+R[7]C[15]+R[7]C[18]+R[7]C[21]+R[7]C[24]+R[7]C[27]+R[7]C[30]+R[7]C[33]+R[7]C[36]+R[7]C[39]+R[14]C[-6]+R[14]C[-3]+R[14]C+R[14]C[3]+R[14]C[6]+R[14]C[9]+R[14]C[12]+R[14]C[15]+R[14]C[18]+R[14]C[21]+R[14]C[24]+R[14]C[27]+R[14]C[30]+R[14]C[33]+R[14]C[36]+R[14]C[39])"
                [J72].FormulaR1C1 = "=SUM(R[21]C[-6]+R[21]C[-3]+R[21]C+R[21]C[3]+R[21]C[6]+R[21]C[9]+R[21]C[12]+R[21]C[15]+R[21]C[18]+R[21]C[21]+R[21]C[24]+R[21]C[27]+R[21]C[30]+R[21]C[33]+R[21]C[36]+R[21]C[39]+R[28]C[-6]+R[28]C[-3]+R[28]C+R[28]C[3]+R[28]C[6]+R[28]C[9]+R[28]C[12]+R[28]C[15]+R[28]C[18]+R[28]C[21]+R[28]C[24]+R[28]C[27]+R[28]C[30]+R[28]C[33]+R[28]C[36]+R[28]C[39]+R[36]C[-6]+R[36]C[-3]+R[36]C+R[36]C[3]+R[36]C[6]+R[36]C[9]+R[36]C[12]+R[36]C[15]+R[36]C[18]+R[36]C[21]+R[36]C[24]+R[36]C[27]+R[36]C[30]+R[36]C[33]+R[36]C[36]+R[36]C[39]+R[43]C[-6]+R[43]C[-3]+R[43]C+R[43]C[3]+R[43]C[6]+R[43]C[9]+R[43]C[12]+R[43]C[15]+R[43]C[18]+R[43]C[21]+R[43]C[24]+R[43]C[27]+R[43]C[30]+R[43]C[33]+R[43]C[36]+R[43]C[39]+R[50]C[-6]+R[50]C[-3]+R[50]C+R[50]C[3]+R[50]C[6]+R[50]C[9]+R[50]C[12]+R[50]C[15]+R[50]C[18]+R[50]C[21]+R[50]C[24]+R[50]C[27]+R[50]C[30]+R[50]C[33]+R[50]C[36]+R[50]C[39])"
                [K72].FormulaR1C1 = "=SUM(R[-55]C[-6]+R[-55]C[-3]+R[-55]C+R[-55]C[3]+R[-55]C[6]+R[-55]C[9]+R[-55]C[12]+R[-55]C[15]+R[-55]C[18]+R[-55]C[21]+R[-55]C[24]+R[-55]C[27]+R[-55]C[30]+R[-55]C[33]+R[-55]C[36]+R[-55]C[39]+R[-45]C[-6]+R[-45]C[-3]+R[-45]C+R[-45]C[3]+R[-45]C[6]+R[-45]C[9]+R[-45]C[12]+R[-45]C[15]+R[-45]C[18]+R[-45]C[21]+R[-45]C[24]+R[-45]C[27]+R[-45]C[30]+R[-45]C[33]+R[-45]C[36]+R[-45]C[39]+R[-34]C[-6]+R[-34]C[-3]+R[-34]C+R[-34]C[3]+R[-34]C[6]+R[-34]C[9]+R[-34]C[12]+R[-34]C[15]+R[-34]C[18]+R[-34]C[21]+R[-34]C[24]+R[-34]C[27]+R[-34]C[30]+R[-34]C[33]+R[-34]C[36]+R[-34]C[39])"
                [K72].FormulaR1C1 = "=SUM(R[-23]C[-6]+R[-23]C[-3]+R[-23]C+R[-23]C[3]+R[-23]C[6]+R[-23]C[9]+R[-23]C[12]+R[-23]C[15]+R[-23]C[18]+R[-23]C[21]+R[-23]C[24]+R[-23]C[27]+R[-23]C[30]+R[-23]C[33]+R[-23]C[36]+R[-23]C[39]+R[-12]C[-6]+R[-12]C[-3]+R[-12]C+R[-12]C[3]+R[-12]C[6]+R[-12]C[9]+R[-12]C[12]+R[-12]C[15]+R[-12]C[18]+R[-12]C[21]+R[-12]C[24]+R[-12]C[27]+R[-12]C[30]+R[-12]C[33]+R[-12]C[36]+R[-12]C[39]+R[-5]C[-6]+R[-5]C[-3]+R[-5]C[3]+R[-5]C[6]+R[-5]C[9]+R[-5]C[12]+R[-5]C[15]+R[-5]C[18])"
                [K72].FormulaR1C1 = "=SUM(R[-5]C[21]+R[-5]C[24]+R[-5]C[27]+R[-5]C[30]+R[-5]C[33]+R[-5]C[36]+R[-5]C[39]+R[1]C[-6]+R[1]C[-3]+R[1]C[3]+R[1]C[6]+R[1]C[9]+R[1]C[12]+R[1]C[15]+R[1]C[18]+R[1]C[21]+R[1]C[24]+R[1]C[27]+R[1]C[30]+R[1]C[33]+R[1]C[36]+R[1]C[39]+R[7]C[-6]+R[7]C[-3]+R[7]C[3]+R[7]C[6]+R[7]C[9]+R[7]C[12]+R[7]C[15]+R[7]C[18]+R[7]C[21]+R[7]C[24]+R[7]C[27]+R[7]C[30]+R[7]C[33]+R[7]C[36]+R[7]C[39]+R[14]C[-6]+R[14]C[-3]+R[14]C+R[14]C[3]+R[14]C[6]+R[14]C[9]+R[14]C[12]+R[14]C[15]+R[14]C[18]+R[14]C[21]+R[14]C[24]+R[14]C[27]+R[14]C[30]+R[14]C[33]+R[14]C[36]+R[14]C[39]+R[21]C[-6]+R[21]C[-3])"
                [K72].FormulaR1C1 = "=SUM(R[21]C+R[21]C[3]+R[21]C[6]+R[21]C[9]+R[21]C[12]+R[21]C[15]+R[21]C[18]+R[21]C[21]+R[21]C[24]+R[21]C[27]+R[21]C[30]+R[21]C[33]+R[21]C[36]+R[21]C[39]+R[28]C[-6]+R[28]C[-3]+R[28]C+R[28]C[3]+R[28]C[6]+R[28]C[9]+R[28]C[12]+R[28]C[15]+R[28]C[18]+R[28]C[21]+R[28]C[24]+R[28]C[27]+R[28]C[30]+R[28]C[33]+R[28]C[36]+R[28]C[39]+R[36]C[-6]+R[36]C[-3]+R[36]C+R[36]C[3]+R[36]C[6]+R[36]C[9]+R[36]C[12]+R[36]C[15]+R[36]C[18]+R[36]C[21]+R[36]C[24]+R[36]C[27]+R[36]C[30]+R[36]C[33]+R[36]C[36]+R[36]C[39]+R[43]C[-6]+R[43]C[-3]+R[43]C+R[43]C[3]+R[43]C[6]+R[43]C[9]+R[43]C[12]+R[43]C[15]+R[43]C[18]+R[43]C[21]+R[43]C[24]+R[43]C[27]+R[43]C[30]+R[43]C[33]+R[43]C[36]+R[43]C[39]+R[50]C[-6]+R[50]C[-3]+R[50]C+R[50]C[3]+R[50]C[6]+R[50]C[9]+R[50]C[12]+R[50]C[15]+R[50]C[18]+R[50]C[21]+R[50]C[24]+R[50]C[27]+R[50]C[30]+R[50]C[33]+R[50]C[36]+R[50]C[39])"
                [B65] = "SEXTA"
            ElseIf ActiveSheet.Range("B66").Value = 6 Then
                [J74].FormulaR1C1 = "=SUM(R[-57]C[-6]+R[-57]C[-3]+R[-57]C+R[-57]C[3]+R[-57]C[6]+R[-57]C[9]+R[-57]C[12]+R[-57]C[15]+R[-57]C[18]+R[-57]C[21]+R[-57]C[24]+R[-57]C[27]+R[-57]C[30]+R[-57]C[33]+R[-57]C[36]+R[-57]C[39]+R[-47]C[-6]+R[-47]C[-3]+R[-47]C+R[-47]C[3]+R[-47]C[6]+R[-47]C[9]+R[-47]C[12]+R[-47]C[15]+R[-47]C[18]+R[-47]C[21]+R[-47]C[24]+R[-47]C[27]+R[-47]C[30]+R[-47]C[33]+R[-47]C[36]+R[-47]C[39]+R[-36]C[-6]+R[-36]C[-3]+R[-36]C+R[-36]C[3]+R[-36]C[6]+R[-36]C[9]+R[-36]C[12]+R[-36]C[15]+R[-36]C[18]+R[-36]C[21]+R[-36]C[24])"
                [J74].FormulaR1C1 = "=SUM(R[-36]C[27]+R[-36]C[30]+R[-36]C[33]+R[-36]C[36]+R[-36]C[39]+R[-25]C[-6]+R[-25]C[-3]+R[-25]C+R[-25]C[3]+R[-25]C[6]+R[-25]C[9]+R[-25]C[12]+R[-25]C[15]+R[-25]C[18]+R[-25]C[21]+R[-25]C[24]+R[-25]C[27]+R[-25]C[30]+R[-25]C[33]+R[-25]C[36]+R[-25]C[39]+R[-14]C[-6]+R[-14]C[-3]+R[-14]C+R[-14]C[3]+R[-14]C[6]+R[-14]C[9]+R[-14]C[12]+R[-14]C[15]+R[-14]C[18]+R[-14]C[21]+R[-14]C[24]+R[-14]C[27]+R[-14]C[30]+R[-14]C[33]+R[-14]C[36]+R[-14]C[39]+R[-7]C[-6]+R[-7]C[-3]+R[-7]C[3]+R[-7]C[6]+R[-7]C[9]+R[-7]C[12]+R[-7]C[15]+R[-7]C[18])"
                [J74].FormulaR1C1 = "=SUM(R[-7]C[21]+R[-7]C[24]+R[-7]C[27]+R[-7]C[30]+R[-7]C[33]+R[-7]C[36]+R[-7]C[39]+R[-1]C[-6]+R[-1]C[-3]+R[-1]C[3]+R[-1]C[6]+R[-1]C[9]+R[-1]C[12]+R[-1]C[15]+R[-1]C[18]+R[-1]C[21]+R[-1]C[24]+R[-1]C[27]+R[-1]C[30]+R[-1]C[33]+R[-1]C[36]+R[-1]C[39]+R[5]C[-6]+R[5]C[-3]+R[5]C[3]+R[5]C[6]+R[5]C[9]+R[5]C[12]+R[5]C[15]+R[5]C[18]+R[5]C[21]+R[5]C[24]+R[5]C[27]+R[5]C[30]+R[5]C[33]+R[5]C[36]+R[5]C[39]+R[12]C[-6]+R[12]C[-3]+R[12]C+R[12]C[3]+R[12]C[6]+R[12]C[9]+R[12]C[12]+R[12]C[15]+R[12]C[18]+R[12]C[21]+R[12]C[24]+R[12]C[27]+R[12]C[30])"
                [J74].FormulaR1C1 = "=SUM(R[12]C[33]+R[12]C[36]+R[12]C[39]+R[19]C[-6]+R[19]C[-3]+R[19]C+R[19]C[3]+R[19]C[6]+R[19]C[9]+R[19]C[12]+R[19]C[15]+R[19]C[18]+R[19]C[21]+R[19]C[24]+R[19]C[27]+R[19]C[30]+R[19]C[33]+R[19]C[36]+R[19]C[39]+R[26]C[-6]+R[26]C[-3]+R[26]C+R[26]C[3]+R[26]C[6]+R[26]C[9]+R[26]C[12]+R[26]C[15]+R[26]C[18]+R[26]C[21]+R[26]C[24]+R[26]C[27]+R[26]C[30]+R[26]C[33]+R[26]C[36]+R[26]C[39]+R[34]C[-6]+R[34]C[-3]+R[34]C+R[34]C[3]+R[34]C[6]+R[34]C[9]+R[34]C[12]+R[34]C[15]+R[34]C[18]+R[34]C[21]+R[34]C[24]+R[34]C[27]+R[34]C[30]+R[34]C[33]+R[34]C[36]+R[34]C[39]+R[41]C[-6]+R[41]C[-3]+R[41]C+R[41]C[3]+R[41]C[6]+R[41]C[9]+R[41]C[12]+R[41]C[15]+R[41]C[18]+R[41]C[21]+R[41]C[24]+R[41]C[27]+R[41]C[30]+R[41]C[33]+R[41]C[36]+R[41]C[39]+R[48]C[-6]+R[48]C[-3]+R[48]C+R[48]C[3]+R[48]C[6]+R[48]C[9]+R[48]C[12]+R[48]C[15]+R[48]C[18]+R[48]C[21]+R[48]C[24]+R[48]C[27]+R[48]C[30]+R[48]C[33]+R[48]C[36]+R[48]C[39])"
                [K74].FormulaR1C1 = "=SUM(R[-57]C[-6]+R[-57]C[-3]+R[-57]C+R[-57]C[3]+R[-57]C[6]+R[-57]C[9]+R[-57]C[12]+R[-57]C[15]+R[-57]C[18]+R[-57]C[21]+R[-57]C[24]+R[-57]C[27]+R[-57]C[30]+R[-57]C[33]+R[-57]C[36]+R[-57]C[39]+R[-47]C[-6]+R[-47]C[-3]+R[-47]C+R[-47]C[3]+R[-47]C[6]+R[-47]C[9]+R[-47]C[12]+R[-47]C[15]+R[-47]C[18]+R[-47]C[21]+R[-47]C[24]+R[-47]C[27]+R[-47]C[30]+R[-47]C[33]+R[-47]C[36]+R[-47]C[39]+R[-36]C[-6]+R[-36]C[-3]+R[-36]C+R[-36]C[3]+R[-36]C[6]+R[-36]C[9]+R[-36]C[12]+R[-36]C[15]+R[-36]C[18]+R[-36]C[21]+R[-36]C[24]+R[-36]C[27]+R[-36]C[30]+R[-36]C[33])"
                [K74].FormulaR1C1 = "=SUM(R[-36]C[36]+R[-36]C[39]+R[-25]C[-6]+R[-25]C[-3]+R[-25]C+R[-25]C[3]+R[-25]C[6]+R[-25]C[9]+R[-25]C[12]+R[-25]C[15]+R[-25]C[18]+R[-25]C[21]+R[-25]C[24]+R[-25]C[27]+R[-25]C[30]+R[-25]C[33]+R[-25]C[36]+R[-25]C[39]+R[-14]C[-6]+R[-14]C[-3]+R[-14]C+R[-14]C[3]+R[-14]C[6]+R[-14]C[9]+R[-14]C[12]+R[-14]C[15]+R[-14]C[18]+R[-14]C[21]+R[-14]C[24]+R[-14]C[27]+R[-14]C[30]+R[-14]C[33]+R[-14]C[36]+R[-14]C[39]+R[-7]C[-6]+R[-7]C[-3]+R[-7]C[3]+R[-7]C[6]+R[-7]C[9]+R[-7]C[12]+R[-7]C[15]+R[-7]C[18])"
                [K74].FormulaR1C1 = "=SUM(R[-7]C[21]+R[-7]C[24]+R[-7]C[27]+R[-7]C[30]+R[-7]C[33]+R[-7]C[36]+R[-7]C[39]+R[-1]C[-6]+R[-1]C[-3]+R[-1]C[3]+R[-1]C[6]+R[-1]C[9]+R[-1]C[12]+R[-1]C[15]+R[-1]C[18]+R[-1]C[21]+R[-1]C[24]+R[-1]C[27]+R[-1]C[30]+R[-1]C[33]+R[-1]C[36]+R[-1]C[39]+R[5]C[-6]+R[5]C[-3]+R[5]C[3]+R[5]C[6]+R[5]C[9]+R[5]C[12]+R[5]C[15]+R[5]C[18]+R[5]C[21]+R[5]C[24]+R[5]C[27]+R[5]C[30]+R[5]C[33]+R[5]C[36]+R[5]C[39]+R[12]C[-6]+R[12]C[-3]+R[12]C+R[12]C[3]+R[12]C[6]+R[12]C[9]+R[12]C[12]+R[12]C[15]+R[12]C[18]+R[12]C[21]+R[12]C[24]+R[12]C[27]+R[12]C[30]+R[12]C[33])"
                [K74].FormulaR1C1 = "=SUM(R[12]C[36]+R[12]C[39]+R[19]C[-6]+R[19]C[-3]+R[19]C+R[19]C[3]+R[19]C[6]+R[19]C[9]+R[19]C[12]+R[19]C[15]+R[19]C[18]+R[19]C[21]+R[19]C[24]+R[19]C[27]+R[19]C[30]+R[19]C[33]+R[19]C[36]+R[19]C[39]+R[26]C[-6]+R[26]C[-3]+R[26]C+R[26]C[3]+R[26]C[6]+R[26]C[9]+R[26]C[12]+R[26]C[15]+R[26]C[18]+R[26]C[21]+R[26]C[24]+R[26]C[27]+R[26]C[30]+R[26]C[33]+R[26]C[36]+R[26]C[39]+R[34]C[-6]+R[34]C[-3]+R[34]C+R[34]C[3]+R[34]C[6]+R[34]C[9]+R[34]C[12]+R[34]C[15]+R[34]C[18]+R[34]C[21]+R[34]C[24]+R[34]C[27])"
                [K74].FormulaR1C1 = "=SUM(R[34]C[30]+R[34]C[33]+R[34]C[36]+R[34]C[39]+R[41]C[-6]+R[41]C[-3]+R[41]C+R[41]C[3]+R[41]C[6]+R[41]C[9]+R[41]C[12]+R[41]C[15]+R[41]C[18]+R[41]C[21]+R[41]C[24]+R[41]C[27]+R[41]C[30]+R[41]C[33]+R[41]C[36]+R[41]C[39]+R[48]C[-6]+R[48]C[-3]+R[48]C+R[48]C[3]+R[48]C[6]+R[48]C[9]+R[48]C[12]+R[48]C[15]+R[48]C[18]+R[48]C[21]+R[48]C[24]+R[48]C[27]+R[48]C[30]+R[48]C[33]+R[48]C[36]+R[48]C[39])"
                [B65] = "SBADO"
            ElseIf ActiveSheet.Range("B66").Value = 7 Then
                [J76].FormulaR1C1 = "=SUM(R[-59]C[-6]+R[-59]C[-3]+R[-59]C+R[-59]C[3]+R[-59]C[6]+R[-59]C[9]+R[-59]C[12]+R[-59]C[15]+R[-59]C[18]+R[-59]C[21]+R[-59]C[24]+R[-59]C[27]+R[-59]C[30]+R[-59]C[33]+R[-59]C[36]+R[-59]C[39]+R[-49]C[-6]+R[-49]C[-3]+R[-49]C+R[-49]C[3]+R[-49]C[6]+R[-49]C[9]+R[-49]C[12]+R[-49]C[15]+R[-49]C[18]+R[-49]C[21]+R[-49]C[24]+R[-49]C[27]+R[-49]C[30]+R[-49]C[33]+R[-49]C[36]+R[-49]C[39]+R[-38]C[-6]+R[-38]C[-3]+R[-38]C+R[-38]C[3]+R[-38]C[6]+R[-38]C[9]+R[-38]C[12]+R[-38]C[15]+R[-38]C[18]+R[-38]C[21]+R[-38]C[24]+R[-38]C[27]+R[-38]C[30])"
                [J76].FormulaR1C1 = "=SUM(R[-38]C[33]+R[-38]C[36]+R[-38]C[39]+R[-27]C[-6]+R[-27]C[-3]+R[-27]C+R[-27]C[3]+R[-27]C[6]+R[-27]C[9]+R[-27]C[12]+R[-27]C[15]+R[-27]C[18]+R[-27]C[21]+R[-27]C[24]+R[-27]C[27]+R[-27]C[30]+R[-27]C[33]+R[-27]C[36]+R[-27]C[39]+R[-16]C[-6]+R[-16]C[-3]+R[-16]C+R[-16]C[3]+R[-16]C[6]+R[-16]C[9]+R[-16]C[12]+R[-16]C[15]+R[-16]C[18]+R[-16]C[21]+R[-16]C[24]+R[-16]C[27]+R[-16]C[30]+R[-16]C[33]+R[-16]C[36]+R[-16]C[39]+R[-9]C[-6]+R[-9]C[-3]+R[-9]C[3]+R[-9]C[6]+R[-9]C[9]+R[-9]C[12]+R[-9]C[15]+R[-9]C[18])"
                [J76].FormulaR1C1 = "=SUM(R[-9]C[21]+R[-9]C[24]+R[-9]C[27]+R[-9]C[30]+R[-9]C[33]+R[-9]C[36]+R[-9]C[39]+R[-3]C[-6]+R[-3]C[-3]+R[-3]C[3]+R[-3]C[6]+R[-3]C[9]+R[-3]C[12]+R[-3]C[15]+R[-3]C[18]+R[-3]C[21]+R[-3]C[24]+R[-3]C[27]+R[-3]C[30]+R[-3]C[33]+R[-3]C[36]+R[-3]C[39]+R[3]C[-6]+R[3]C[-3]+R[3]C[3]+R[3]C[6]+R[3]C[9]+R[3]C[12]+R[3]C[15]+R[3]C[18]+R[3]C[21]+R[3]C[24]+R[3]C[27]+R[3]C[30]+R[3]C[33]+R[3]C[36]+R[3]C[39]+R[10]C[-6]+R[10]C[-3]+R[10]C+R[10]C[3]+R[10]C[6]+R[10]C[9]+R[10]C[12]+R[10]C[15]+R[10]C[18]+R[10]C[21]+R[10]C[24]+R[10]C[27]+R[10]C[30])"
                [J76].FormulaR1C1 = "=SUM(R[10]C[33]+R[10]C[36]+R[10]C[39]+R[17]C[-6]+R[17]C[-3]+R[17]C+R[17]C[3]+R[17]C[6]+R[17]C[9]+R[17]C[12]+R[17]C[15]+R[17]C[18]+R[17]C[21]+R[17]C[24]+R[17]C[27]+R[17]C[30]+R[17]C[33]+R[17]C[36]+R[17]C[39]+R[24]C[-6]+R[24]C[-3]+R[24]C+R[24]C[3]+R[24]C[6]+R[24]C[9]+R[24]C[12]+R[24]C[15]+R[24]C[18]+R[24]C[21]+R[24]C[24]+R[24]C[27]+R[24]C[30]+R[24]C[33]+R[24]C[36]+R[24]C[39]+R[32]C[-6]+R[32]C[-3]+R[32]C+R[32]C[3]+R[32]C[6]+R[32]C[9]+R[32]C[12]+R[32]C[15]+R[32]C[18]+R[32]C[21]+R[32]C[24]+R[32]C[27]+R[32]C[30]+R[32]C[33]+R[32]C[36]+R[32]C[39]+R[39]C[-6]+R[39]C[-3]+R[39]C+R[39]C[3]+R[39]C[6]+R[39]C[9]+R[39]C[12]+R[39]C[15]+R[39]C[18]+R[39]C[21]+R[39]C[24]+R[39]C[27]+R[39]C[30]+R[39]C[33]+R[39]C[36]+R[39]C[39]+R[46]C[-6]+R[46]C[-3]+R[46]C+R[46]C[3]+R[46]C[6]+R[46]C[9]+R[46]C[12]+R[46]C[15]+R[46]C[18]+R[46]C[21]+R[46]C[24]+R[46]C[27]+R[46]C[30]+R[46]C[33]+R[46]C[36]+R[46]C[39])"
                [K76].FormulaR1C1 = "=SUM(R[-59]C[-6]+R[-59]C[-3]+R[-59]C+R[-59]C[3]+R[-59]C[6]+R[-59]C[9]+R[-59]C[12]+R[-59]C[15]+R[-59]C[18]+R[-59]C[21]+R[-59]C[24]+R[-59]C[27]+R[-59]C[30]+R[-59]C[33]+R[-59]C[36]+R[-59]C[39]+R[-49]C[-6]+R[-49]C[-3]+R[-49]C+R[-49]C[3]+R[-49]C[6]+R[-49]C[9]+R[-49]C[12]+R[-49]C[15]+R[-49]C[18]+R[-49]C[21]+R[-49]C[24]+R[-49]C[27]+R[-49]C[30]+R[-49]C[33]+R[-49]C[36]+R[-49]C[39]+R[-38]C[-6]+R[-38]C[-3]+R[-38]C+R[-38]C[3]+R[-38]C[6]+R[-38]C[9]+R[-38]C[12]+R[-38]C[15]+R[-38]C[18]+R[-38]C[21]+R[-38]C[24])"
                [K76].FormulaR1C1 = "=SUM(R[-38]C[27]+R[-38]C[30]+R[-38]C[33]+R[-38]C[36]+R[-38]C[39]+R[-27]C[-6]+R[-27]C[-3]+R[-27]C+R[-27]C[3]+R[-27]C[6]+R[-27]C[9]+R[-27]C[12]+R[-27]C[15]+R[-27]C[18]+R[-27]C[21]+R[-27]C[24]+R[-27]C[27]+R[-27]C[30]+R[-27]C[33]+R[-27]C[36]+R[-27]C[39]+R[-16]C[-6]+R[-16]C[-3]+R[-16]C+R[-16]C[3]+R[-16]C[6]+R[-16]C[9]+R[-16]C[12]+R[-16]C[15]+R[-16]C[18]+R[-16]C[21]+R[-16]C[24]+R[-16]C[27]+R[-16]C[30]+R[-16]C[33]+R[-16]C[36]+R[-16]C[39]+R[-9]C[-6]+R[-9]C[-3]+R[-9]C[3]+R[-9]C[6]+R[-9]C[9]+R[-9]C[12]+R[-9]C[15]+R[-9]C[18])"
                [K76].FormulaR1C1 = "=SUM(R[-9]C[21]+R[-9]C[24]+R[-9]C[27]+R[-9]C[30]+R[-9]C[33]+R[-9]C[36]+R[-9]C[39]+R[-3]C[-6]+R[-3]C[-3]+R[-3]C[3]+R[-3]C[6]+R[-3]C[9]+R[-3]C[12]+R[-3]C[15]+R[-3]C[18]+R[-3]C[21]+R[-3]C[24]+R[-3]C[27]+R[-3]C[30]+R[-3]C[33]+R[-3]C[36]+R[-3]C[39]+R[3]C[-6]+R[3]C[-3]+R[3]C[3]+R[3]C[6]+R[3]C[9]+R[3]C[12]+R[3]C[15]+R[3]C[18]+R[3]C[21]+R[3]C[24]+R[3]C[27]+R[3]C[30]+R[3]C[33]+R[3]C[36]+R[3]C[39]+R[10]C[-6]+R[10]C[-3]+R[10]C+R[10]C[3]+R[10]C[6]+R[10]C[9]+R[10]C[12]+R[10]C[15]+R[10]C[18]+R[10]C[21]+R[10]C[24]+R[10]C[27]+R[10]C[30])"
                [K76].FormulaR1C1 = "=SUM(R[10]C[33]+R[10]C[36]+R[10]C[39]+R[17]C[-6]+R[17]C[-3]+R[17]C+R[17]C[3]+R[17]C[6]+R[17]C[9]+R[17]C[12]+R[17]C[15]+R[17]C[18]+R[17]C[21]+R[17]C[24]+R[17]C[27]+R[17]C[30]+R[17]C[33]+R[17]C[36]+R[17]C[39]+R[24]C[-6]+R[24]C[-3]+R[24]C+R[24]C[3]+R[24]C[6]+R[24]C[9]+R[24]C[12]+R[24]C[15]+R[24]C[18]+R[24]C[21]+R[24]C[24]+R[24]C[27]+R[24]C[30]+R[24]C[33]+R[24]C[36]+R[24]C[39]+R[32]C[-6]+R[32]C[-3]+R[32]C+R[32]C[3]+R[32]C[6]+R[32]C[9]+R[32]C[12]+R[32]C[15]+R[32]C[18]+R[32]C[21]+R[32]C[24]+R[32]C[27]+R[32]C[30]+R[32]C[33]+R[32]C[36]+R[32]C[39]+R[39]C[-6]+R[39]C[-3]+R[39]C+R[39]C[3]+R[39]C[6]+R[39]C[9]+R[39]C[12]+R[39]C[15]+R[39]C[18]+R[39]C[21]+R[39]C[24]+R[39]C[27]+R[39]C[30]+R[39]C[33]+R[39]C[36]+R[39]C[39]+R[46]C[-6]+R[46]C[-3]+R[46]C+R[46]C[3]+R[46]C[6]+R[46]C[9]+R[46]C[12]+R[46]C[15]+R[46]C[18]+R[46]C[21]+R[46]C[24]+R[46]C[27]+R[46]C[30]+R[46]C[33]+R[46]C[36]+R[46]C[39])"
                [B65] = "DOMINGO"
            End If
End Sub


