Thank you for the reply Jason. I recorded the Macro and the upload was not picked up. Please see the VBA code below.
Sub Automatic_Upload()
Range("E9").FormulaR1C1 = "=EOMONTH(TODAY(),0)"
Range("B20").Select
ActiveCell.FormulaR1C1 = " "
Range("B21").Select
ActiveCell.FormulaR1C1 = " "
Range("B22").Select
ActiveCell.FormulaR1C1 = " "
Range("B24").Select
ActiveCell.FormulaR1C1 = " "
Range("B25").Select
ActiveCell.FormulaR1C1 = " "
Range("B26").Select
ActiveCell.FormulaR1C1 = " "
Range("B27").Select
ActiveCell.FormulaR1C1 = " "
Range("B28").Select
ActiveCell.FormulaR1C1 = " "
Range("B29").Select
ActiveCell.FormulaR1C1 = " "
Range("B31").Select
ActiveCell.FormulaR1C1 = " "
Range("B32").Select
ActiveCell.FormulaR1C1 = " "
Range("B33").Select
ActiveCell.FormulaR1C1 = " "
Range("B34").Select
ActiveCell.FormulaR1C1 = " "
Range("B35").Select
ActiveCell.FormulaR1C1 = " "
Range("B36").Select
ActiveCell.FormulaR1C1 = " "
Range("B37").Select
ActiveCell.FormulaR1C1 = " "
Range("B38").Select
ActiveCell.FormulaR1C1 = " "
Range("B39").Select
ActiveCell.FormulaR1C1 = " "
Range("B40").Select
ActiveCell.FormulaR1C1 = " "
Range("B41").Select
ActiveCell.FormulaR1C1 = " "
Range("B42").Select
ActiveCell.FormulaR1C1 = " "
Range("B43").Select
ActiveCell.FormulaR1C1 = " "
Range("B44").Select
ActiveCell.FormulaR1C1 = " "
Range("B45").Select
ActiveCell.FormulaR1C1 = " "
Range("B46").Select
End Sub