Is there a way to trigger Worksheet_Change code after modules execute?

[djjack37]

I've got a workbook consisting of 3 tabs (book2) with some pretty elaborate logic to populate the tabs with data based on the import of another workbook (book1). Once the data is brought in, I want to setup Worksheet_Change logic on certain ranges in book2 to highlight changes to the default data.

Does anyone have any ideas on how to do this (or if it's even possible)? Maybe set some variable in the book2 module that loads the data from book1 that forces the worksheet change event to fall out of the sub until complete?

 

[dmt32]

Hi,
Welcome to the board.
It is possible to call a Worksheet_Change event from a procedure in standard module if that is what you require. However, probably much simpler if you need to use same code from different places in your project to create it as a common a code (you can pass Range object to your common code as an argument) & call that from where needed.
As an example:

Worksheet Change Event:

 Private Sub Worksheet_Change(ByVal Target As Range)   
 If Not Intersect(Target, Range("A10")) Is Nothing Then
    CommonCode Target
    End If
End Sub

Common code in standard module:

 Sub CommonCode(ByVal Target As Range)    
  MsgBox Target.Address
End Sub

Common code called from another code.

 Sub CallCommonCode()    
 CommonCode Range("A10")
End Sub

You can if needed turn off the worksheet change event by setting Application.EnableEvents = False
You must though, reset this back to True when processing completed.

Hope Helpful

Dave.

 

[djjack37]

Dave, you're a genius! It worked just as you describe.

Thanks,

Derrick

 

[dmt32]

Dave, you're a genius! It worked just as you describe.

Thanks,

Derrick

I would not go that far but your generous feedback very much appreciated.

Dave