Hi all,

I'm trying to have a sub called to execute after a workbook is saved --
literally, I would like the code to execute as soon as the file is saved, but
not before, as the sub is storing the name of the workbook in a cell in the
worksheet. I need the name to be current with whatever the name of the
worksheet is at any given time. I see that there is a Workbook level command
that executes before Save, but I don't see anything for after Save.

Thanks for your help!



--
Robert

Why don't you let Excel enter the filename by itself:
http://office.microsoft.com/en-us/ex...346271033.aspx

hth
carlo

On Dec 21, 3:59*pm, robs3131
wrote:
Hi all,

I'm trying to have a sub called to execute after a workbook is saved --
literally, I would like the code to execute as soon as the file is saved, but
not before, as the sub is storing the name of the workbook in a cell in the
worksheet. *I need the name to be current with whatever the name of the
worksheet is at any given time. *I see that there is a Workbook level command
that executes before Save, but I don't see anything for after Save.

Thanks for your help!

--
Robert

hi, !

I'm trying to have a sub called to execute after a workbook is saved -- literally
I would like the code to execute as soon as the file is saved, but not before
as the sub is storing the name of the workbook in a cell in the worksheet.
I need the name to be current with whatever the name of the worksheet is at any given time.
I see that there is a Workbook level command that executes before Save, but I don't see anything for after Save.
Thanks for your help!

besides the cell("filename") worksheet function (suggested by carlo)
you can "handle" your _beforesave event to execute a procedure "after_save" if you...

1) use a general code module to define a normal sub-procedure (to be executed "after_save") i.e.

Option Private Module
Sub After_Saved()
MsgBox "This workbook has been saved as:" & vbCr & _
ThisWorkbook.FullName
End Sub

2) in your workbook_beforesave event, use the OnTime method to launch "the sub-procedure"
(which will be executed "after") i.e.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.OnTime Now, "After_Saved"
End Sub

hth,
hector.

Thanks Hector and Carlo - that helped!

--
Robert


"Héctor Miguel" wrote:

hi, !

I'm trying to have a sub called to execute after a workbook is saved -- literally
I would like the code to execute as soon as the file is saved, but not before
as the sub is storing the name of the workbook in a cell in the worksheet.
I need the name to be current with whatever the name of the worksheet is at any given time.
I see that there is a Workbook level command that executes before Save, but I don't see anything for after Save.
Thanks for your help!

besides the cell("filename") worksheet function (suggested by carlo)
you can "handle" your _beforesave event to execute a procedure "after_save" if you...

1) use a general code module to define a normal sub-procedure (to be executed "after_save") i.e.

Option Private Module
Sub After_Saved()
MsgBox "This workbook has been saved as:" & vbCr & _
ThisWorkbook.FullName
End Sub

2) in your workbook_beforesave event, use the OnTime method to launch "the sub-procedure"
(which will be executed "after") i.e.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.OnTime Now, "After_Saved"
End Sub

hth,
hector.