The easiest way is probably to open Workbook A and simply do a "SaveAs", which will save an exact copy of it under a different file name.
If you use the Macro Recorder, you can get most of the VBA code you need to do that.
The only thing you probably might have to edit is the file name, if you want it to be different each time.
We can help you make that part of the code more dynamic, if you need, if you lay out the rules for us.
Thank you Joe.
I used the code below and it is working fine so far. I do need to delete the first column in the new Workbook. Would you be able to guide me with that?
I tried Columns("A").delete but it is deleting the column in the workbook where I have the VBA. I do not know how to refer to the new workbook so that it deletes the first column on it.
Thank you,
Dim newWB As Workbook, currentWB As Workbook
Dim newS As Worksheet, currentS As Worksheet
'Copy the data you need
Set currentWB = ThisWorkbook
Set currentS = currentWB.Sheets("Worksite 4")
currentS.Range("A1:M5000").Copy
'Create a new file that will receive the data
Set newWB = Workbooks.Add
With newWB
Set newS = newWB.Sheets("Sheet1")
newS.Range("A1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
'Save in CSV
Application.DisplayAlerts = False
.SaveAs Filename:="C:\DOWNLOADS\Worksite 4.csv", FileFormat:=xlCSV
Application.DisplayAlerts = True