View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
NateBuckley NateBuckley is offline
external usenet poster
 
Posts: 146
Default automatic close of pages

Copy this into your sheet of choice.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(1, 1).Value = False Or Cells(1, 1).Value = "FALSE" Then
ThisWorkbook.Save
Application.Quit
End If
End Sub

Hope this helps!
"N+" wrote:

hi all !!!
in presence of a "false" in my cell a1 i want my worksheet to save and close..
can u help me ??
ty , paolo