Actualizar datos externos en libro compartido

[dogwall]

Buenos días,

Trabajo con un libro compartido con macros al que he tenido que conectar una lista de datos externa (lista Sharepoint). La conexión la tengo configurada para que se actualicen los datos cada vez que se abra el fichero pero no funciona. Si el libro deja de estar compartido la conexión se actualiza sin problemas pero al estar compartido no funciona.

Cómo alternativa se me había ocurrido esto:

 

Sub Actualiza_Datos_Promos()

Application.DisplayAlerts = False
If ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.ExclusiveAccess
End If

'Actualizo los datos
ActiveWorkbook.Connections("Conexión").Refresh
Application.Wait (Now + TimeValue("00:00:05"))            ‘Aquí incluso he dejado unos segundos por si la conexión tarda en actualizarse, pero la lista son pocos registros y no debería.

Application.DisplayAlerts = True

'Lanzo la rutina principal
Call Carga_Fichero

Application.DisplayAlerts = False

If Not ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, _
        accessMode:=xlShared
End If

Application.DisplayAlerts = True

MsgBox "Proceso Finalizado"

End Sub

El caso es que sigue sin funcionar... Tengo que volver a dejar el libro sin compartir y actualizar la conexión a mano para que se actualicen los datos...

¿Alguna idea de lo que pasa? ¿Puede solucionarse?

Gracias.