Question : VBA code to select the folder one level above this workbook's folder

This is incredibly basic but how do I get the SaveAs code below to go up one level from the workbook location? I've tried a bunch of variations on: ActiveWorkbook.Path & "..\Working Files\4Recon\ ...   etc., and the path (as identified in the error message) still has within it the current directory that I want to get one level above. ??

Thanks,
John

Code Snippet:
1:
2:
ActiveWorkbook.SaveAs Filename:= _
        ActiveWorkbook.Path & "\Working Files\4Recon\" & [AirlinePrefix] & " " & [Week] & "_ToBeReconciled.xls"

Answer : VBA code to select the folder one level above this workbook's folder

ActiveWorkbook.SaveAs Filename:= _
       ActiveWorkbook.Path & "\..\Working Files\4Recon\" & [AirlinePrefix] & " " & [Week] & "_ToBeReconciled.xls"

Kevin

See you in a week when you get back from your vacation ;-)
Random Solutions  
 
programming4us programming4us