Maybe:

filename:="N:\Aarons Team\TSA Core Reports\" _
& Sheets("dashboard").Range("B6").Value & " Weekly Report " _
& Format(Date, "mmdd") & ".xlsx"

I think you'll want to read about what Local does in VBA's help under .saveas.

wrote:

I have having using a macro to "save as" to a particular file
location. For some reason it was working and now it always saves the
file to "my document". I don't know what happened. Below is the code,
with the location I want to save it at in "local". Any ideas?

Sub save()
ActiveWorkbook.SaveAs FileFormat:=51,
Filename:=Sheets("dashboard").Range("B6").Value & " Weekly Report " &
Format(Date, "mmdd"), Local:="N:\Aarons Team\TSA Core Reports"
End Sub

--

Dave Peterson