For Each ctrl In Me.Controls
If TypeOf ctrl Is MSForms.ComboBox Then
Select Case ctrl.Value
Case "Material Issue"
Sheets("Single").Range("A21:P21").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Dry Film Lamination"
Sheets("Single").Range("A22:P25").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Exposure"
Sheets("Single").Range("A26:P29").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Develop"
Sheets("Single").Range("A30:P31").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Etching"
Sheets("Single").Range("A32:P40").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Stripping"
Sheets("Single").Range("A41:P41").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "PTH"
Sheets("Single").Range("A42:P42").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "AOI"
Sheets("Single").Range("A45:P47").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Target Punch (CVH)"
Sheets("Single").Range("A48:P49").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Lay Up Bonding Film"
Sheets("Single").Range("A50:P54").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Lay Up Coverlay"
Sheets("Single").Range("A55:P57").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Coverlay Lamination"
Sheets("Single").Range("A58:P62").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Kiss Lamination"
Sheets("Single").Range("A63:P65").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Lay Up Stiffener"
Sheets("Single").Range("A66:P71").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Stiffener Lamination"
Sheets("Single").Range("A72:P75").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Baking"
Sheets("Single").Range("A76:P77").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Legend Printing"
Sheets("Single").Range("A78:P81").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Target Punch 2 (TH)"
Sheets("Single").Range("A82:P83").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Post Treatment"
Sheets("Single").Range("A84:P85").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Electroless Nickel Immersion Gold"
Sheets("Single").Range("A86:P88").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Electrolytic Nickel Gold Plating"
Sheets("Single").Range("A89:P91").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Lay Up PSA"
Sheets("Single").Range("A92:P93").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Hot Roll"
Sheets("Single").Range("A96:P96").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Electrical Test"
Sheets("Single").Range("A97:P97").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Subpanel"
Sheets("Single").Range("A98:P100").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Piercing"
Sheets("Single").Range("A101:P103").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Tie bar"
Sheets("Single").Range("A104:P107").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Kiss Cut"
Sheets("Single").Range("A108:P111").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Outline"
Sheets("Single").Range("A114:P117").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "AX OSP"
Sheets("Single").Range("A118:P118").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Impendance Test"
Sheets("Single").Range("A19:P24").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Visual Inspection"
Sheets("Single").Range("A127:P125").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Outgoing Inspection"
Sheets("Single").Range("A128:P131").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Packing"
Sheets("Single").Range("A32:P33").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Finish Good Store"
Sheets("Single").Range("A34:P34").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Panel Cutting"
Sheets("Single").Range("A43:P43").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Panel Measurement"
Sheets("Single").Range("A44:P44").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Masking"
Sheets("Single").Range("A94:P94").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Unmasking"
Sheets("Single").Range("A95:P95").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
Case "Piercing (Laser)"
Sheets("Single").Range("A112:P113").Copy
PasteCell = Sheets("Template").Cells(Rows.Count, "A").End(xlUp).Row + 1
Worksheets("Template").Range("A" & PasteCell).Offset(1).Insert
End Select
End If
Next