function returning blank on running

You have this line of code

 If chkevent = "Books" Then

but you have not passed chkevent to the function, you pass it Eventtype.

If you put Option Explicit at the top of the module, you'd probably get a compile error as the variable is not defined.