Llamando a una macro de Excel desde la cinta

Intro: he escrito algunas macros cortas de Excel (probado, funcionan bien) y quiero vincularlas a un botón en la cinta de opciones (Excel 2010). Ya lo había hecho con éxito en Excel 2007. Estoy usando el Editor de IU personalizado para crear una nueva cinta, que también funciona bien. Todo está empaquetado en un complemento .xlam y agregado a Excel. La cinta se muestra muy bien, todos los demás botones funcionan, pero ...

Problema: cuando presiono el botón que está vinculado a la macro aparece el error: "número incorrecto de parámetros o asignación de propiedad no válida" (el mensaje traducido del italiano puede no ser exactamente el mismo en inglés)

Información de solución de problemas: las macros no tienen parámetros. Las mismas macros se pueden invocar y ejecutar con éxito manualmente. Incluso puedo agregar las mismas macros a la barra de herramientas de acceso rápido.

Aquí está la parte específica del script de la cinta:

<group id="DupNumber" label="Number" insertBeforeMso="GroupNumber" >  
    <comboBox idMso="NumberFormatGallery"/> 
    <box id="HN1" boxStyle="horizontal"> 
        <buttonGroup id="HNButtonGroup1"> 
            <button id="Euro" onAction="Roberto.xlam!EURZ" imageMso="F" supertip="text ..."/> 
            <button id="EuroNZ" onAction="Roberto.xlam!EURNZ" imageMso="E" supertip="text ..."/> 
            <button idMso="PercentStyle"/> 
            <button id="Comma" onAction="Roberto.xlam!NewCommaFormat" imageMso="C" supertip="test ..."/> 
            <button idMso="PercentStyle"/> 
        </buttonGroup> 
    </box>

y aquí están las macros:

Sub EURZ()
    Application.ActiveCell.NumberFormat = "€ #,##0.00"
End Sub
Sub EURNZ()
    Application.ActiveCell.NumberFormat = "€ #,##0"
End Sub
Sub NewCommaFormat()
    Application.ActiveCell.NumberFormat = "#,##0"
End Sub

¿Me puedes ayudar? Gracias Roberto

Respuestas a la pregunta(1)

Su respuesta a la pregunta