Message à l'ouverture classeur avec liaison

Bonjour,
j’ai 1 classeur comportant plusieurs feuilles avec des liaisons sur d’autres fichiers exter à ce classeur.
J’ai fait un VBA pour mettre à jour les liaisons (voir ci après)

Private Sub Workbook_Open()
Application.Run (“MiseAJour”)
Range(“D4”).Select
ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
MsgBox “Clic sur bouton MISE A JOUR”
End Sub

Ce code fonctionne et j’ai vérifié que les mises à jour fonctionnent.
MAIS !
j’ai quand même un message "
Ce classeur comporte des liaisons avec 1 ou plusieurs sources externes qui peuvent présenter 1 risque.
Si ces liaisons sont fiables, mettez à jour pour obtenir les dernières données.
dans le cas contraire…"
Comment puis-je éliminer ce message ?
merci d’avance