View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Cush Cush is offline
external usenet poster
 
Posts: 126
Default Why 2 clicks on a command button

I have an addin which opens a 2nd wbk with 3 Forms buttons on sh1 of the wbk.
Two buttons work as expected. The 3rd requires a second click (not
dbl-click, but two single clicks ) to make it work. The first click causes
the screen to flicker, so it's doing something. The second click fires it
correctly. Why 2 clicks ?

Public Sub ShutdownApplication()

' Ignore any errors during shutdown.
On Error Resume Next
gbShutdownInProgress = True

With Application
.DisplayFormulaBar = True
.Workbooks(gsFILE_RENTAL_APPL).Close False
'Restore the state of the Excel environment
Call RestoreExcelSettings

' If there are no workbooks left open, quit Excel
' Otherwise just close this workbook.
If lCountVisibleWorkbooks() = 0 Then
ThisWorkbook.Saved = True
.Quit
Else
ThisWorkbook.Close False
End If
End With
End Sub