Parece que não há solução para o problema real - criei uma macro a partir de trechos da Web - postada aqui, caso seja útil:
Sub SaveCloseReopen()
Dim strCMD As String
strCMD = "CMD /C PING 10.0.0.0 -n 1 -w 10000 >NUL & Excel.exe " & Chr(34) & ActiveWorkbook.FullName & Chr(34)
Shell strCMD, vbHide
ActiveWorkbook.Close SaveChanges:=True
End Sub
Aguarda 10 segundos, o que parece ser tempo suficiente para o arquivo ser atualizado - embora seja um ponto da semana no código!