Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
this.Activate
Save wb_exit: etc. -- Vasant "Steved" wrote in message ... Hello from Steved When I use the close button could the below have added please "save" Thankyou. Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Dim this As Worksheet On Error GoTo wb_exit Application.EnableEvents = False Set this = ActiveSheet Sh.Activate Range("A5").Activate this.Activate wb_exit: Application.EnableEvents = True End Sub |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thankyou.
"Vasant Nanavati" wrote: this.Activate Save wb_exit: etc. -- Vasant "Steved" wrote in message ... Hello from Steved When I use the close button could the below have added please "save" Thankyou. Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Dim this As Worksheet On Error GoTo wb_exit Application.EnableEvents = False Set this = ActiveSheet Sh.Activate Range("A5").Activate this.Activate wb_exit: Application.EnableEvents = True End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
could not save all data and formatting you recently added | Excel Discussion (Misc queries) | |||
Excell docs save with a 1 added on. | Excel Discussion (Misc queries) | |||
Excel could not save all the data and formatting you recently added | Excel Discussion (Misc queries) | |||
Can Save be added to this! | Excel Worksheet Functions | |||
I've added hyperlinks to cells, but when I save the file they don' | Excel Discussion (Misc queries) |