Disabling "group edit" mode in Excel
Sundar,
Put this into the codemodule of the Thisworkbook object:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveWindow.SelectedSheets.Count 1 Then
With Application
.EnableEvents = False
.Undo
MsgBox "Oh, please don't group the sheets..."
ActiveWindow.SelectedSheets(1).Select 'Ungroups
.EnableEvents = True
End With
End If
End Sub
--
HTH,
Bernie
MS Excel MVP
"sundarvenkata" wrote in message
...
Hi All,
Is there a way to disable the "group edit" mode in Excel completely?
Or is it atleast possible to program an add-in that will prevent the
user from editing data into any cell while in "group edit" mode?
Thanks,
Sundar
|