Form dá Erro 13 Tipos Incompátiveis

PrezadosEstou tentando executar a Macro em anexo, porém dá erro 13. Meu Office é 2010 de 64bits. Ela contém API para executar o Menu no formulário.Obs.: Peguei esta macro na net e irei personalizar para o que estou querendo fazer.

Obrigado desde já pela a atenção,

Form.xlsb