I have the below VBA in Excel. What I would to do is inhance it to be
prompted to input a number in the line Set rStoreNo = Range("g7:g9753") only
where the 9753 is. The columns will always be the same as will g7. Also I
would like the same for rStoreNo.Value = "0002" where it says "0002".

Sub InputStoreNum()

Dim rStoreNo As Excel.Range

Set rStoreNo = Range("g7:g9753")
rStoreNo.Value = "0002"
Call DeleteRows

End Sub