![]() |
Why _Change(ByVal Target As Range)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$9" Then LTVisable End Sub This used to work. Now it won't. No protection, ScreenUpdating = True, LTVisable works, even substituted something simple, still won't fire. Tried to use on other worksheets within workbook, still won't fire. Open new workbook, OK that works. Why won't this work? -- Jim at Eagle |
Why _Change(ByVal Target As Range)
Anywhere in your your application have you run
Application.enableevents = false without the corresponding Application.enableevents = true Being run? Tru running this code and then see if things are back to normal Sub Test Application.enableevents = true End Sub HTH "Jim at Eagle" wrote: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$D$9" Then LTVisable End Sub This used to work. Now it won't. No protection, ScreenUpdating = True, LTVisable works, even substituted something simple, still won't fire. Tried to use on other worksheets within workbook, still won't fire. Open new workbook, OK that works. Why won't this work? -- Jim at Eagle |
Why _Change(ByVal Target As Range)
Set a breakpoint on the If statement. If the debugger stops there then the
Worksheet_Change event is firing ok. Next, break the one-line If statement into multiple lines. (There is no problem with a one-line If statement, but do this for the next step.) Now set a breakpoint on the LTVisible line If Target.Address = "$D$9" Then LTVisable endif If the debugger doesn't stop there then cell $D$9 must not be changing. If it does stop there then step through the sub and find out why it isn't doing anything. "Jim at Eagle" wrote: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$D$9" Then LTVisable End Sub This used to work. Now it won't. No protection, ScreenUpdating = True, LTVisable works, even substituted something simple, still won't fire. Tried to use on other worksheets within workbook, still won't fire. Open new workbook, OK that works. Why won't this work? -- Jim at Eagle |
Why _Change(ByVal Target As Range)
Macros are disabled?
-- Regards, Tom Ogilvy "Jim at Eagle" wrote in message ... Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$D$9" Then LTVisable End Sub This used to work. Now it won't. No protection, ScreenUpdating = True, LTVisable works, even substituted something simple, still won't fire. Tried to use on other worksheets within workbook, still won't fire. Open new workbook, OK that works. Why won't this work? -- Jim at Eagle |
Why _Change(ByVal Target As Range)
Thanks, I used Application.EnableEvents = False one time instead of
Application.ScreenUpdating = False and I made sure I closed all False to True loops except for the one use of enableEvents. You posted a question the other day and I will try to help you in about two lifetimes from now. -- Jim at Eagle "Jim Thomlinson" wrote: Anywhere in your your application have you run Application.enableevents = false without the corresponding Application.enableevents = true Being run? Tru running this code and then see if things are back to normal Sub Test Application.enableevents = true End Sub HTH "Jim at Eagle" wrote: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$D$9" Then LTVisable End Sub This used to work. Now it won't. No protection, ScreenUpdating = True, LTVisable works, even substituted something simple, still won't fire. Tried to use on other worksheets within workbook, still won't fire. Open new workbook, OK that works. Why won't this work? -- Jim at Eagle |
All times are GMT +1. The time now is 11:47 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com