Nick Hodge
12/18/2006 10:43:00 PM
Steved
The running of the code will always wipe the 'undo buffer'
You can run the undo method but it must be the first line of the code, so is
not of use in your issue
--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
nick_hodgeTAKETHISOUT@zen.co.ukANDTHIS
www.nickhodge.co.uk
"Steved" <Steved@discussions.microsoft.com> wrote in message
news:294B93F5-CCDA-422C-B22E-682C4BFC0A23@microsoft.com...
> Hello from Steved.
>
> I've installed the below formula in excel but the undo function button
> geys
> out after I use the enter key to goto the next cell and stays greyed out,
> but
> when I delete the below formula the undo function works fine. My question
> please what do I need to do to allow the undo function to work, at all
> times.
>
> Option Explicit
> Private Sub Worksheet_Change(ByVal Target As Excel.Range)
> With Target
> If .Count > 1 Then Exit Sub
> If Not Intersect(Range("A5:AB272"), .Cells) Is Nothing Then
> Application.EnableEvents = False
> If Not IsEmpty(.Value) Then
> Me.Range("b3") = Now
> End If
> Application.EnableEvents = True
> End If
> End With
> End Sub
>
> Thankyou.
>
>