ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Macro syntax: SaveAs Filename=ActiveCell.Text . BUT to a specified folder (https://www.excelbanter.com/excel-programming/394556-macro-syntax-saveas-filename%3Dactivecell-text-but-specified-folder.html)

[email protected]

Macro syntax: SaveAs Filename=ActiveCell.Text . BUT to a specified folder
 
Hi, I would like to "save as" with the active cell value to a
specified folder.
If use SaveAs Filename=ActiveCell.Text it save to My documents which I
don't want.
Any tips? Thanks in advance / Magnus

ActiveWorkbook.SaveAs Filename:=ActiveCell.Text, FileFormat:=xlNormal
_
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False


[email protected]

Macro syntax: SaveAs Filename=ActiveCell.Text . BUT to a specified folder
 
On 1 Aug, 15:12, wrote:
Hi, I would like to "save as" with the active cell value to a
specified folder.
If use SaveAs Filename=ActiveCell.Text it save to My documents which I
don't want.
Any tips? Thanks in advance / Magnus

ActiveWorkbook.SaveAs Filename:=ActiveCell.Text, FileFormat:=xlNormal
_
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False


SaveAs filename:="C:\temp\" & activecell.text

obviously replace my example c:\temp with whatever path you want!!!


steve_doc

Macro syntax: SaveAs Filename=ActiveCell.Text . BUT to a specified
 
answer taken from another thread on same subject from Bob Phillips

sFilename = Format(Worksheets("Sheet1").Range("A1").Value, "yyyy-mm-dd")
ans = MsgBox ("Save file as " & sFilename)
if ans = vbOK Then
Activeworkbook.SaveAs Filename:= sFilename
End If

Above should give you the general idea, although if memory serves this will
still save to your default "My Documents", will search for another method as
this was a question I asked on this NG a while ago

HTH

" wrote:

Hi, I would like to "save as" with the active cell value to a
specified folder.
If use SaveAs Filename=ActiveCell.Text it save to My documents which I
don't want.
Any tips? Thanks in advance / Magnus

ActiveWorkbook.SaveAs Filename:=ActiveCell.Text, FileFormat:=xlNormal
_
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False



Zone[_3_]

Macro syntax: SaveAs Filename=ActiveCell.Text . BUT to a specified folder
 
If you know the path in which you want to save the file, just add the path
to the filename:
ActiveWorkbook.SaveAs Filename:="C:\Test\" & ActiveCell.Text
HTH, James
wrote in message
ups.com...
Hi, I would like to "save as" with the active cell value to a
specified folder.
If use SaveAs Filename=ActiveCell.Text it save to My documents which I
don't want.
Any tips? Thanks in advance / Magnus

ActiveWorkbook.SaveAs Filename:=ActiveCell.Text, FileFormat:=xlNormal
_
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False





All times are GMT +1. The time now is 10:59 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com