In a macro I am running, the cursor is required to select a cell 'E1',
where the user is expected to enter some value and once the value is
entered, the macro should execute the remaining lines. However, I am
unable to cause the macro to wait till the input is actually entered
and the macro executes all the lines without waiting for input. Can
someone suggest a solution ?

Range("E1").Select
ActiveCell.FormulaR1C1 = ""
ActiveSheet.PageSetup.PrintArea = "$A$1:$I$51"
ActiveWorkbook.Save
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True