Bonjour,

J'ai un classeur qui me sert à faire des recherches et des statistiques à partir d'une base sur un autre classeur excel.
Pour cela, je fonctionne avec les 2 classeurs ouverts et à l'ouverture de mon classeur, je vérifies que la base est ouverte, sinon je l'ouvres, comme vous pouvez le voir dans le code.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Workbook_Open()
    On Error Resume Next
    Workbooks("Base.xlsm").Activate
    If Err.Number <> 0 Then
        Err.Clear
        Application.EnableEvents = False
        Workbooks.Open ("D:\fichiers\Base.xlsm")
        Application.EnableEvents = True
    End If
    On Error GoTo 0
    ThisWorkbook.Activate
    ThisWorkbook.UpdateLinks = xlUpdateLinksAlways
End Sub
Tout ce passait bien jusque là mais le transfert des fonctionnalités sur un nouveau PC quad core plus rapide, fait que maintenant j'ai un message, si la macro ouvre la base, sur l'impossibilité de mettre à jour les liaisons qui concernent les statistiques effectuées sur la base.
En faisant "Continuer" sur le message, l'application fonctionne correctement, mais y-a-t-il un moyen de supprimer ce message ?
Merci d'avance à ceux qui connaissent la solution.