Trying to simplify my macro code

Z

Zurina

New Member
Joined
Aug 21, 2013
Messages
9
Morning and thanks in advance.

Having problem with my macro...the procedure was too large. Can anyone help me simplify my code?


Code: 
Sub Units()
'
' Units Macro
' Update Creation & Cancellation Tables
'
Select Case Sheets("Fs").Range("A8").Value
'Sheet A&C-MYR
Case 1
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C10").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D10").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E10").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F10").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G10").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H10").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I10").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L10").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M10").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N10").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O10").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P10").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U10").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V10").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W10").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X10").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y10").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z10").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA10").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD10").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE10").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF10").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG10").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH10").Value = Sheets("Input 2").Range("D21").Value
Case 2
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C11").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D11").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E11").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F11").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G11").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H11").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I11").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L11").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M11").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N11").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O11").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P11").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U11").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V11").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W11").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X11").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y11").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z11").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA11").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD11").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE11").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF11").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG11").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH11").Value = Sheets("Input 2").Range("D21").Value
Case 3
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C12").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D12").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E12").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F12").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G12").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H12").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I12").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L12").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M12").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N12").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O12").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P12").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U12").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V12").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W12").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X12").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y12").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z12").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA12").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD12").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE12").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF12").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG12").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH12").Value = Sheets("Input 2").Range("D21").Value
Case 4
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C13").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D13").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E13").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F13").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G13").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H13").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I13").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L13").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M13").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N13").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O13").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P13").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U13").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V13").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W13").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X13").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y13").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z13").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA13").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD13").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE13").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF13").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG13").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH13").Value = Sheets("Input 2").Range("D21").Value
Case 5
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C14").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D14").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E14").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F14").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G14").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H14").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I14").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L14").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M14").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N14").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O14").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P14").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U14").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V14").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W14").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X14").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y14").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z14").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA14").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD14").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE14").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF14").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG14").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH14").Value = Sheets("Input 2").Range("D21").Value
Case 6
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C15").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D15").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E15").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F15").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G15").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H15").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I15").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L15").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M15").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N15").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O15").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P15").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U15").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V15").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W15").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X15").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y15").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z15").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA15").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD15").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE15").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF15").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG15").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH15").Value = Sheets("Input 2").Range("D21").Value
Case 7
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C16").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D16").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E16").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F16").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G16").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H16").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I16").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L16").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M16").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N16").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O16").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P16").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U16").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V16").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W16").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X16").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y16").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z16").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA16").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD16").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE16").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF16").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG16").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH16").Value = Sheets("Input 2").Range("D21").Value
Case 8
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C17").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D17").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E17").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F17").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G17").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H17").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I17").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L17").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M17").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N17").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O17").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P17").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U17").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V17").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W17").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X17").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y17").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z17").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA17").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD17").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE17").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF17").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG17").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH17").Value = Sheets("Input 2").Range("D21").Value
Case 9
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C18").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D18").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E18").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F18").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G18").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H18").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I18").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L18").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M18").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N18").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O18").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P18").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U18").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V18").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W18").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X18").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y18").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z18").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA18").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD18").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE18").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF18").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG18").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH18").Value = Sheets("Input 2").Range("D21").Value
Case 10
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C19").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D19").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E19").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F19").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G19").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H19").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I19").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L19").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M19").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N19").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O19").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P19").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U19").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V19").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W19").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X19").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y19").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z19").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA19").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD19").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE19").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF19").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG19").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH19").Value = Sheets("Input 2").Range("D21").Value
Case 11
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C20").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D20").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E20").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F20").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G20").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H20").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I20").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L20").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M20").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N20").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O20").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P20").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U20").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V20").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W20").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X20").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y20").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z20").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA20").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD20").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE20").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF20").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG20").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH20").Value = Sheets("Input 2").Range("D21").Value
Case 12
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C21").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D21").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E21").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F21").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G21").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H21").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I21").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L21").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M21").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N21").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O21").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P21").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U21").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V21").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W21").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X21").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y21").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z21").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA21").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD21").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE21").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF21").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG21").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH21").Value = Sheets("Input 2").Range("D21").Value
Case 13
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C22").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D22").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E22").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F22").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G22").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H22").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I22").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L22").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M22").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N22").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O22").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P22").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U22").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V22").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W22").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X22").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y22").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z22").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA22").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD22").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE22").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF22").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG22").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH22").Value = Sheets("Input 2").Range("D21").Value
Case 14
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C23").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D23").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E23").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F23").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G23").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H23").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I23").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L23").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M23").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N23").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O23").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P23").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U23").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V23").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W23").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X23").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y23").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z23").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA23").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD23").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE23").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF23").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG23").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH23").Value = Sheets("Input 2").Range("D21").Value
Case 15
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C24").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D24").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E24").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F24").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G24").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H24").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I24").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L24").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M24").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N24").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O24").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P24").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U24").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V24").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W24").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X24").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y24").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z24").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA24").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD24").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE24").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF24").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG24").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH24").Value = Sheets("Input 2").Range("D21").Value
Case 16
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C25").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D25").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E25").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F25").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G25").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H25").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I25").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L25").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M25").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N25").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O25").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P25").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U25").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V25").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W25").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X25").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y25").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z25").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA25").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD25").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE25").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF25").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG25").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH25").Value = Sheets("Input 2").Range("D21").Value
Case 17
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C26").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D26").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E26").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F26").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G26").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H26").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I26").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L26").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M26").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N26").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O26").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P26").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U26").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V26").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W26").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X26").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y26").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z26").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA26").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD26").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE26").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF26").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG26").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH26").Value = Sheets("Input 2").Range("D21").Value
Case 18
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C27").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D27").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E27").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F27").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G27").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H27").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I27").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L27").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M27").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N27").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O27").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P27").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U27").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V27").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W27").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X27").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y27").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z27").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA27").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD27").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE27").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF27").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG27").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH27").Value = Sheets("Input 2").Range("D21").Value
Case 19
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C28").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D28").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E28").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F28").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G28").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H28").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I28").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L28").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M28").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N28").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O28").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P28").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U28").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V28").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W28").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X28").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y28").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z28").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA28").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD28").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE28").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF28").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG28").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH28").Value = Sheets("Input 2").Range("D21").Value
Case 20
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C29").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D29").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E29").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F29").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G29").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H29").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I29").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L29").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M29").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N29").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O29").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P29").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U29").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V29").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W29").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X29").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y29").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z29").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA29").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD29").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE29").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF29").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG29").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH29").Value = Sheets("Input 2").Range("D21").Value
Case 21
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C30").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D30").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E30").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F30").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G30").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H30").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I30").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L30").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M30").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N30").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O30").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P30").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U30").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V30").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W30").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X30").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y30").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z30").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA30").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD30").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE30").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF30").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG30").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH30").Value = Sheets("Input 2").Range("D21").Value
Case 22
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C31").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D31").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E31").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F31").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G31").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H31").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I31").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L31").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M31").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N31").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O31").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P31").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U31").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V31").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W31").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X31").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y31").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z31").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA31").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD31").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE31").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF31").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG31").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH31").Value = Sheets("Input 2").Range("D21").Value
Case 23
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C32").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D32").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E32").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F32").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G32").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H32").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I32").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L32").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M32").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N32").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O32").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P32").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U32").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V32").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W32").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X32").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y32").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z32").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA32").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD32").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE32").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF32").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG32").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH32").Value = Sheets("Input 2").Range("D21").Value
Case 24
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C33").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D33").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E33").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F33").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G33").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H33").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I33").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L33").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M33").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N33").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O33").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P33").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U33").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V33").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W33").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X33").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y33").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z33").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA33").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD33").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE33").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF33").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG33").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH33").Value = Sheets("Input 2").Range("D21").Value
Case 25
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C34").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D34").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E34").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F34").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G34").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H34").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I34").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L34").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M34").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N34").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O34").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P34").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U34").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V34").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W34").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X34").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y34").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z34").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA34").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD34").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE34").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF34").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG34").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH34").Value = Sheets("Input 2").Range("D21").Value
Case 26
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C35").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D35").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E35").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F35").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G35").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H35").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I35").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L35").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M35").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N35").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O35").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P35").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U35").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V35").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W35").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X35").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y35").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z35").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA35").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD35").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE35").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF35").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG35").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH35").Value = Sheets("Input 2").Range("D21").Value
Case 27
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C36").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D36").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E36").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F36").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G36").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H36").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I36").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L36").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M36").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N36").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O36").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P36").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U36").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V36").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W36").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X36").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y36").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z36").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA36").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD36").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE36").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF36").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG36").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH36").Value = Sheets("Input 2").Range("D21").Value
Case 28
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C37").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D37").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E37").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F37").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G37").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H37").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I37").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L37").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M37").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N37").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O37").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P37").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U37").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V37").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W37").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X37").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y37").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z37").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA37").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD37").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE37").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF37").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG37").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH37").Value = Sheets("Input 2").Range("D21").Value
Case 29
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C38").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D38").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E38").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F38").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G38").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H38").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I38").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L38").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M38").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N38").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O38").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P38").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U38").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V38").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W38").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X38").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y38").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z38").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA38").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD38").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE38").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF38").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG38").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH38").Value = Sheets("Input 2").Range("D21").Value
Case 30
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C39").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D39").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E39").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F39").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G39").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H39").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I39").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L39").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M39").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N39").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O39").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P39").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U39").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V39").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W39").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X39").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y39").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z39").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA39").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD39").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE39").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF39").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG39").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH39").Value = Sheets("Input 2").Range("D21").Value
Case 31
'A-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("C40").Value = Sheets("A&C-MYR").Range("I56").Value
        Sheets("CrCn").Range("D40").Value = Sheets("A&C-MYR").Range("G62").Value
        Sheets("CrCn").Range("E40").Value = Sheets("Input 2").Range("C24").Value
        Sheets("CrCn").Range("F40").Value = Sheets("Input 2").Range("C25").Value
        Sheets("CrCn").Range("G40").Value = Sheets("Input 2").Range("C26").Value
        Sheets("CrCn").Range("H40").Value = Sheets("Input 2").Range("C29").Value
        Sheets("CrCn").Range("I40").Value = Sheets("Input 2").Range("C30").Value
'Update Creation Table
        Sheets("CrCn").Range("L40").Value = Sheets("Input 2").Range("C15").Value
        Sheets("CrCn").Range("M40").Value = Sheets("Input 2").Range("C16").Value
        Sheets("CrCn").Range("N40").Value = Sheets("Input 2").Range("C17").Value
        Sheets("CrCn").Range("O40").Value = Sheets("Input 2").Range("C20").Value
        Sheets("CrCn").Range("P40").Value = Sheets("Input 2").Range("C21").Value
'C-MYR
'Update Cancellation Table
        Sheets("CrCn").Range("U40").Value = Sheets("A&C-MYR").Range("S56").Value
        Sheets("CrCn").Range("V40").Value = Sheets("A&C-MYR").Range("Q62").Value
        Sheets("CrCn").Range("W40").Value = Sheets("Input 2").Range("D24").Value
        Sheets("CrCn").Range("X40").Value = Sheets("Input 2").Range("D25").Value
        Sheets("CrCn").Range("Y40").Value = Sheets("Input 2").Range("D26").Value
        Sheets("CrCn").Range("Z40").Value = Sheets("Input 2").Range("D29").Value
        Sheets("CrCn").Range("AA40").Value = Sheets("Input 2").Range("D30").Value
'Update Creation Table
        Sheets("CrCn").Range("AD40").Value = Sheets("Input 2").Range("D15").Value
        Sheets("CrCn").Range("AE40").Value = Sheets("Input 2").Range("D16").Value
        Sheets("CrCn").Range("AF40").Value = Sheets("Input 2").Range("D17").Value
        Sheets("CrCn").Range("AG40").Value = Sheets("Input 2").Range("D20").Value
        Sheets("CrCn").Range("AH40").Value = Sheets("Input 2").Range("D21").Value
End Select
'
End Sub
 
Last edited by a moderator:
Sort by date Sort by votes
Thanks to everyone.

I have tried the codes and it works well on my worksheet. Just like doing add maths. I loved it.


In future, if i have problem again, do help me out.

Thanks.

Zurina, KL.

DeusXv said:
lol I wouldn't even attempt to run that :warning:
Click to expand...
 
Upvote 0
Glad you got it working....thanks for the feedback...:beerchug:
 
Upvote 0
Can anyone help me with this?
I tried to do it like what Michael did but I dun know how to put the Copy, cut and paste things into formula.
Appreciate everyone's help.
Thanks.

Sub UIC()
'
' UIC Macro
'
' Keyboard Shortcut: Ctrl+o


Select Case Sheets("Fs").Range("A9").Value

'A-MYR

Case 1
Sheets("UIC").Select
Range("C10:L10").Select
Selection.Copy
Range("C11").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Range("C10:L10").Select
Selection.Copy
Range("C10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

Case 2
Sheets("UIC").Select
Range("C11:L11").Select
Selection.Copy
Range("C12").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Range("C11:L11").Select
Selection.Copy
Range("C11").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

Case 3
Sheets("UIC").Select
Range("C12:L12").Select
Selection.Copy
Range("C13").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Range("C12:L12").Select
Selection.Copy
Range("C12").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
 
Upvote 0
You must log in or register to reply here.

Similar threads

I
  • Solved
Simplify my working code please
Replies
7
Views
302
ipbr21054
I
N
  • Question Question
My code is suddenly really slow
Replies
1
Views
403
RobP
R
Agnarr
  • Question Question
VBA problem with creating new sheets
Replies
0
Views
1K
Agnarr
Agnarr
D
  • Question Question
VBA to Create Outlook Email Not Working for All Users
Replies
9
Views
498
Logit
Logit
W
  • Question Question
Trying to learn how to loop code
Replies
1
Views
272
mumps
mumps

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top