Saving a file using a specific name in a cell
I would like to direct users to fill a cell in a sheet with their Login name.
The value of this cell will then be used as the filename to save the spreadsheet. Can anyone help me to automate this process! I tried the following sub from a previous answer but it crashes my excel! sub foo() with activeworkbook .saveas filename:=.worksheets("sheet1").range("A1").value end with end sub |
Works for me.
Do you mean "crashes" as in shuts down? Any error message(s)? Do you have a sheet1? Any invalid characters in A1? Gord Dibben Excel MVP On Thu, 24 Feb 2005 10:03:11 -0800, "SU" wrote: I would like to direct users to fill a cell in a sheet with their Login name. The value of this cell will then be used as the filename to save the spreadsheet. Can anyone help me to automate this process! I tried the following sub from a previous answer but it crashes my excel! sub foo() with activeworkbook .saveas filename:=.worksheets("sheet1").range("A1").value end with end sub |
The Program Error prompt is shown followed by closure of Excel.
"Gord Dibben" wrote: Works for me. Do you mean "crashes" as in shuts down? Any error message(s)? Do you have a sheet1? Any invalid characters in A1? Gord Dibben Excel MVP On Thu, 24 Feb 2005 10:03:11 -0800, "SU" wrote: I would like to direct users to fill a cell in a sheet with their Login name. The value of this cell will then be used as the filename to save the spreadsheet. Can anyone help me to automate this process! I tried the following sub from a previous answer but it crashes my excel! sub foo() with activeworkbook .saveas filename:=.worksheets("sheet1").range("A1").value end with end sub |
I have sheet1 and have a name in cell A1.
"Gord Dibben" wrote: Works for me. Do you mean "crashes" as in shuts down? Any error message(s)? Do you have a sheet1? Any invalid characters in A1? Gord Dibben Excel MVP On Thu, 24 Feb 2005 10:03:11 -0800, "SU" wrote: I would like to direct users to fill a cell in a sheet with their Login name. The value of this cell will then be used as the filename to save the spreadsheet. Can anyone help me to automate this process! I tried the following sub from a previous answer but it crashes my excel! sub foo() with activeworkbook .saveas filename:=.worksheets("sheet1").range("A1").value end with end sub |
I don't see how the code would cause Excel to throw a Program Error then shut
down. Any chance the users don't have permission to save to the default path? On a Network? Just started happening recently? Gord On Thu, 24 Feb 2005 11:33:02 -0800, "SU" wrote: The Program Error prompt is shown followed by closure of Excel. "Gord Dibben" wrote: Works for me. Do you mean "crashes" as in shuts down? Any error message(s)? Do you have a sheet1? Any invalid characters in A1? Gord Dibben Excel MVP On Thu, 24 Feb 2005 10:03:11 -0800, "SU" wrote: I would like to direct users to fill a cell in a sheet with their Login name. The value of this cell will then be used as the filename to save the spreadsheet. Can anyone help me to automate this process! I tried the following sub from a previous answer but it crashes my excel! sub foo() with activeworkbook .saveas filename:=.worksheets("sheet1").range("A1").value end with end sub |
All times are GMT +1. The time now is 01:54 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com