Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
ADK ADK is offline
external usenet poster
 
Posts: 89
Default Is this code ok?

Before I implement this in my workbook, I just wanted to know if anyone sees
issues/problems with using this code. Seems to work fine. If ok, should I
include error handling in the code?

Both are in ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
Application.Quit
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub

Thanks,

ADK
VBA Beginner


  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 10,593
Default Is this code ok?

Looks okay, but what happens if the workbook has changed, you will get a
message asking to save. Is that OK< or do you want to handle automatically?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"ADK" wrote in message
...
Before I implement this in my workbook, I just wanted to know if anyone
sees issues/problems with using this code. Seems to work fine. If ok,
should I include error handling in the code?

Both are in ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
Application.Quit
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub

Thanks,

ADK
VBA Beginner



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default Is this code ok?

I don't like other workbooks that try to close excel. What if I have multiple
workbooks open when I close your workbook?

ADK wrote:

Before I implement this in my workbook, I just wanted to know if anyone sees
issues/problems with using this code. Seems to work fine. If ok, should I
include error handling in the code?

Both are in ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
Application.Quit
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub

Thanks,

ADK
VBA Beginner


--

Dave Peterson
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
split post code (zip code) out of cell that includes full address Concord Excel Discussion (Misc queries) 4 October 15th 09 06:59 PM
Slow code when used as VBA code instead of macro (copying visible columns) [email protected] Excel Programming 3 April 2nd 07 05:26 PM
Shorten code to apply to all sheets except a few, instead of individually naming them, and later adding to code. Corey Excel Programming 3 December 11th 06 05:14 AM
Protect Sheet with code, but then code will not Paste error. How do i get around this. Please read for explainations.... Corey Excel Programming 4 November 25th 06 04:57 AM
Excel code convert to Access code - Concat & eliminate duplicates italia Excel Programming 1 September 12th 06 12:14 AM


All times are GMT +1. The time now is 02:59 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"