Macro para actualizar datos externos desde Ribboncontrol

He creado un botón personalizado en la cinta de excel para que al pinchar se actualicen las conexiones a datos externos.

El problema que tengo es que la instrucción, que es ActiveWorkbook. RefreshAll no funciona desde el botón de la cinta de opciones:

Public Sub ActualizarTabla(control As IRibbonControl)

               ActiveWorkbook.RefreshAll

End Sub

Al ejecutar esto, me da el mensaje: "No se puede ejecutar la macro "Actualizar". Puede que la macro no esté disponible en este libro o que se hayan deshabilitado todas las macros."

Supongo que desde un RibbonControl a lo mejor la instrucción no debería ser ActiveWorkbook. RefreshAll, pero he buscado y no encuentro nada respecto a esto.

¿Alguien sabe decirme algo?