Intersecting Ranges In Owcspreadsheet Object

I am trying to do some data validation on certain cells in an OWCSpreadsheet object embedded in a userform. To check if the activecell is in the range to be validated, if tried to use

With ssSubjects.activesheet
If Not intersect(ssSubjects.activecell, .Range("$C$2, $D$2:$D$151")) Then
msg "error message..."
endif

in the SheetChange event handler for ssSubjects. It gives Runtime Error 5: Invalid Procedure Call or argument. So I tried to do it with a range with a single area, i.e.

With ssSubjects.activesheet
If Not intersect(ssSubjects.activecell, .Range("$D$2:$D$151")) Then
msg "error message..."
endif

but that gives a type mismatch. Is it possible to user intersect on a OWCSpreadsheet? How could I add data validation to a cell on a OWC spreadsheet? Is it possible? If not, what is the best way to handle data validation.