Copy data from one cell / paste /wait and save.

[GSBR88]

Hi friends

I'm new to Macro World and i learned a lot from the MR.EXCEL, I need some suggestions on this scenario

Cell A1=454 is connected to data if the number is changed all data gets refreshed,(30 sec).

Column X have following numbers

X1 = 454
X2 = 550
X3 = 660
X4 = 770
X5 = 890
so for now i type in the number in to A1 cell from list X and hit enter and let data refresh(30sec) and then save it with my macro SavMe.

Sub SavMe()

Dim newFile As String, fName As String
' Don't use "/" in date, invalid syntax
fName = Range("a1").Value
newFile = "Cashup" & " " & fName
ChDir _
ActiveWorkbook.SaveAs Filename:=newFile
End Sub

Any suggestions or ideas to improvise? any comments are appreciated.

Thanks
GSBR