Alerte mise à jour de liens à l'ouverture

[Sophie11]

Re bonjour 🙂 🙂
J'ai un nouveau petit souci..... Mon fichier effectue un RECHERCHEV sur un autre classeur xls fermé. Et donc quand j'ouvre mon classeur, excel me demande si je souhaite mettre à jour mes données.
Je souhaitais savoir si il était possible que cette alerte n'apparaisse pas et que la mise à jour se fasse toujours??
Je pensais faire le code ci-dessous au demarrage de ma feuille mais cela ne fonctionne pas dans le sens que j'ai toujours mon alerte de mise à jour 🙁

ActiveWorkbook.UpdateLink Name:= _
"F:\exemple\test.xls", _
Type:=xlExcelLinks

Merci par avance 😛

 

[mromain]

Re : Alerte mise à jour de liens à l'ouverture

Bonjour Sophie11,

à tester, modifier la ligne de code (qui ouvre le classeur) comme suit :

Set wbk = Application.Workbooks.Open("E:\test.xls"[COLOR=Red][B], True[/B][/COLOR])

a+

 

[Sophie11]

Re : Alerte mise à jour de liens à l'ouverture

Non ce code m'ouvre mon fichier externe, le but c'est de ne pas l'ouvir mais que ces données soient mise a jour automatiquement sur mon fichier source. (sans avoir besoin de cliquer sur l'alerte mise à jour du lien sur mon fichier source, à l'ouverture)

 

[Efgé]

Re : Alerte mise à jour de liens à l'ouverture

Bonjour Sophie11, mromain,
Peut être avec :
Application.DisplayAlerts = False
'La macro
Application.DisplayAlerts = True
Cordialement

 

[Sophie11]

Re : Alerte mise à jour de liens à l'ouverture

Pas compris 🙁

 

[Efgé]

Re : Alerte mise à jour de liens à l'ouverture

Re
Sophie11 pour éviter les messages d'alerte dans une macro, on peut utiliser Application.DisplayAlerts = False
Donc mon idée , mais il faut tester, est de mettre vos lignes de code dans le thisworkbook, comme le dit mromain, et faire:

Private Sub Workbook_Open()
Application.DisplayAlerts = False
ActiveWorkbook.UpdateLink Name:= _
"F:\exemple\test.xls", _
Type:=xlExcelLinks
Application.DisplayAlerts = True
End Sub

Ou la version de mromain

Private Sub Workbook_Open()
Application.DisplayAlerts = False
Set wbk = Application.Workbooks.Open("E:\test.xls", True)Application.DisplayAlerts = True
End Sub

En espérant avoir eclairci ce qui ne reste qu'une idée.
Cordailement

 

[degap05]

Re : Alerte mise à jour de liens à l'ouverture

Bonjour à tous,

Peut-être dans ThisWorkbook:

Private Sub Workbook_Open()
Application.AskToUpdateLinks = False
End Sub

A essayer

A+

 

[Sophie11]

Re : Alerte mise à jour de liens à l'ouverture

Application.DisplayAlerts = False ne fait pas disparaitre mon alerte 🙁
De plus la version de mromain fait ouvrir mon fichier externe comme je l'ai expliqué plus haut, le but c'est de ne pas l'ouvir mais que ces données soient mise a jour automatiquement sur mon fichier source. (sans avoir besoin de cliquer sur l'alerte mise à jour du lien sur mon fichier source, à l'ouverture)

 

[Efgé]

Re : Alerte mise à jour de liens à l'ouverture

Re
Je pense que vous avez raté le post de degap05, qui semble vous donner la solution 😉.
Cordialement

 

[Dull]

Re : Alerte mise à jour de liens à l'ouverture

Salut Sophie, mromain, FG, degap05, le Forum

Autre solution toute simple mais qui mettra à jour les liens de tout les fichiers

Outils/Options
Onglet Modifications
Décocher Confirmation de la mise à jour automatique des liens

Bonne Journée

 

[Efgé]

Re : Alerte mise à jour de liens à l'ouverture

Re
Salut Dull 🙂,
Efficace ton idée, radicale 😀, mais efficace.
Cordialement