saving file in a macro

How do I save the spreadsheet with the current name of the spreadsheet in a macro?

Example:
I want to save the spreadsheet to a network drive using the current name of the spreadsheet (it changes every other day). But I dont know to put the name in the SAVE statement. Here is what I have now:

ActiveWorkbook.SaveAs Filename:="X:\DPR master.xlsm", FileFormat:= _
        xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

So it always saves as "DPR master". I need it to replace this with the current name of the spreadsheet.

Thanks

    ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Name, _
                          FileFormat:=xlOpenXMLWorkbookMacroEnabled, _
                          CreateBackup:=False

Please edit your post to add code tags.

Great,
How do I specify a directory path?

such as x:\pool\daily.

when I specify it with:

:#
    ChDir "X:\pool\Daily"
    ActiveWorkbook.SaveAs Filename:="x:\POOL\DAILY\" & ActiveWorkbook.Name, _
     FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

I get a file named "activeworkbook.name" on the correct folder.

I get a file named "activeworkbook.name" on the correct folder.

I don't see how if you're using the code you posted (which is still not in code tags as requested).

Changing the directory and then saving the file in the now-current directory is redundant. Either

ChDir "X:\pool\Daily"
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Name, _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

...or

ActiveWorkbook.SaveAs Filename:="x:\POOL\DAILY\" & ActiveWorkbook.Name, _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False