Multiple event macros in a sheet!

Hi all,

I want to run multiple event macros in the same sheet but being a newbie, I can't figure out how to do it. Below are my two events.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Range("A1").Value = ActiveCell.Address
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Row = 3 And Target.Column = 6 Then

Application.EnableEvents = False

Sheets("List").Range("F4").Value = [=IFERROR(VLOOKUP($F$3,Data!$A$1:$C$7,2,0),"")]

Sheets("List").Range("F5").Value = [=IFERROR(VLOOKUP($F$3,Data!$A$1:$C$7,3,0),"")]


End If

Application.EnableEvents = True


End Sub

Thank you for your time and help.

You can run multiple event macros as long as they are not of the same type. You have one Worksheet_SelectionChange macro and one Worksheet_Change macro so that is OK.

You can't!!! It would be easier to help and test possible solutions if you could attach a copy of your file. Explain in detail what you want to do referring to specific cells, rows, columns and sheets using a few examples from your data (de-sensitized if necessary). See the yellow banner at the top of this page for instructions to attach a file.

You probably just need this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
    Range("A1").Value = ActiveCell.Address
Application.EnableEvents = True
End Sub

Should have said ... this

    Range("A1").Value = ActiveCell.Address

will fire the Worksheet_Change event handler.

You're welcome.