Expected function or variable error

Hello, I'm getting the Expected function or variable error in my code and I need a bit of help.

The code is:

Please Login or Register  to view this content.

The error highlights the ".Activate" part in blue on the "wsWEEK4.Activate" code. But what I don't understand is, if I comment the next 7 lines out starting with "ElseIf WEEK_OF_MONTH = 5 Then", then i get no error for the first 4 Elseif statements. Also, WEEK_OF_MONTH should currently = 3 right now in the excel so I don't understand why it even runs the statements in WEEK_OF_MONTH = 5. I'm very confused why this is happening. Please help, thank you!!!