ActiveSheet.Shapes("Button 19").IncrementLeft -13.5
ActiveSheet.Shapes("Button 19").IncrementTop -6.75
ActiveSheet.Shapes("Button 19").ScaleWidth 1.7164179104, msoFalse, _
msoScaleFromBottomRight
Sheets("APAEL").Range("A2:G2").Select
Selection.Copy
Sheets("Absences").Select
Range("A1").End(xlDown).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Absences").Select
Range("D4").Select
Sheets("APAEL").Select
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 9
Range("AK5:AL5").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = ""
Range("AK7:AL7").Select
ActiveCell.FormulaR1C1 = ""
Range("AK9:AL9").Select
ActiveCell.FormulaR1C1 = ""
Range("AK11:AL11").Select
ActiveCell.FormulaR1C1 = ""
Range("AN9").Select
ActiveCell.FormulaR1C1 = ""
Range("AN7").Select
ActiveCell.FormulaR1C1 = ""
Range("AN5").Select
ActiveCell.FormulaR1C1 = ""
Range("AB2").Select
End Sub