Creating a csv file with extract from excel

Hello,

I need to extract data in a sheet called csv (A1:H6) in my excel workbook into a new csv file with a new name.

The new name is generated based on data entered in a cell a1.

Also I want the original file to be saved with the same name just .xls in stead of .csv.

The Macro needs to be run either by pushing a button or entering a certain value in a cell ie. A10.

Can anyone help.

Thanks,