Ich habe folgenden VBA code
Dim sPath As String, sFile As String
Application.ScreenUpdating = False
sPath = Application.Path = "H:\test"
sFile = Format(Date, "yyyy.mm.dd") & "_Energie_" & "Festpricing_" & ".xls"
ActiveSheet.Copy
ActiveWorkbook.SaveAs sFile
ActiveWorkbook.Close savechanges:=False
Ich bekomme es leider nicht hin den sPath so zu bestimmen das es mir die tabelle in den gewünschten Ordner schreibt.
Bitte um Hilfe