runtime error -2147467259 (80004005)
 

On click of the following button it is suppose to call a sub function (either searchdepartment or searchname) the issue is: When searchname is called it returns the following error *-2147467259 (80004005)*) Private Sub cmdcheck_Click() button = "cmdcheck" If cbodepartment.Text "" And...