Hi guys,

I had fixed this problem by moving the whole thing to a new workbook.
However, I faced the problem again this time, and moving to a new
workbook does not work anymore.

I have tried this code:

Private Sub Worksheet_Change(ByVal Target As Range)
If (Target.Address = "$A$1") Then
On Error GoTo catchExp1
ThisWorkbook.ActiveSheet.Cells(2, 1) = "test"
catchExp1:
MsgBox Err.Description
End If
End Sub

That's it.........I have tried to catch the error description and it
says "Application-defined or Object-defined Error". Last time I said
there is no error returned because I didn't use the "On Error Goto
xxx"....
Same as last time, if I type, it works.

Thank you.......

Jensan


On Jun 3, 8:26 am, Dave Peterson wrote:
I'm surprised that you remembered it, much less its problems <vbg.

I haven't used that since we got rid of xl95.





OssieMac wrote:

Thanks Dave. Now that you have raised it I have realized my mistake. Confused
myself with the OnEntry method of identifying entries to auto run a procedure
which doesn't fire if data is pasted.

Regards,

OssieMac

"Dave Peterson" wrote:

You sure that the worksheet_change event doesn't fire when you paste into a
cell?

OssieMac wrote:

I assume that you are using a Worksheet Change event. This does not work when
something is pasted to a cell and I assume that changes created by a dropdown
is the same as pasting.

Regards,

OssieMac

"Jensan" wrote:

Hi all,

I am trying to use a simple VBA program to delete a row when the value of a
cell changed. A drop-down list is provided to the cell.

The function was working, but after some changes now it isn't. No error
message is returned. However, when i tried to change the value by typing, it
works. Also I have tried to create another dummy list for testing, and it
also doesn't work. The delete function just gives no response.

Could anyone advise what change would do something like this?

Thank you.

Jensan

--

Dave Peterson

--

Dave Peterson- Hide quoted text -

- Show quoted text -