Saving CSV file and sending to a folder over and over again

Thanks for any help in advance

I have this code

Sub save_file_as()
Sheets("CSV").Select
        ActiveWorkbook.SaveAs Filename:= _
        Range("'MATCH SETUP'!B34").Value & ".csv", FileFormat:= _
        xlCSV
          Sheets("Calculator").Select
End Sub

so when i run this macro it saves the sheet caleed CSV as CSV file as a name from another sheet which changes all the time,, this works ok

however my problem is this only works once because when i run the macro again it cant find the Sheet called CSV anymore because it has renamed it from the previous running of the macro

so i need to be able to run the macro whenever i want over and over again

also it would be good not only could i save it by running the macro via a form button but also say it saves itself every 10 seconds, that would be a bonus

hope ive explained it well


thanks
scott