I've been having a heck of a time accomplishing what I thought would be an incredibly simple test. All I am trying to achieve is to pop up a MsgBox when a user selects a new cell or changes the contents of a cell.

I've been at this for about 6 hours and so far have zero success! I have identical behavior with Office 2016 (Windows 10) and with Office 2013 (Windows 7).

Here are my method(s):

  1. Create a new macro-enabled workbook.
  2. Record a new macro in the workbook. Stop the recording. Open VBA.
  3. Open the code for "Module 1" and replace the undesired code with the code below. Save the file.
  4. File -> Options -> Trust Center -> Trust Center Settings -> Macro Settings -> "Trust access to the VBA project object model" is selected. Save the file.
  5. I also have ensured Application.EnableEvents = True
  6. I am expecting to be able to click on various cells, or edit cells, and received a MsgBox whenever the event occurs.


Here is my code:
Option Explicit　
 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)       
    MsgBox "changed!"   
End

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    MsgBox "selected!" 
End Sub
 
Public Sub Just_In_Case() 
    Application.EnableEvents = True 
End Sub

What am I missing? Is there a security setting preventing this action event? I have the same behavior online at work as I do offline at home.


Thank you in advance for your help!

PS Here is the screenshot of my VBA environment, if relevant:
Capture.jpg