Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
Bonjour.
Essaie :
ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways
Cordialement.
Daniel
"myname" <nospam@ihatespam.com> a écrit dans le message de news:
440440e8@news.sncf.fr...
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture,
j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
myname
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a coché "Modification / Confirmation de la mise à jour".
"Daniel" a écrit dans le message de news:u%
Bonjour. Essaie : ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Cordialement. Daniel "myname" a écrit dans le message de news:
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée
au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a coché
"Modification / Confirmation de la mise à jour".
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de
news:u%23RuD2GPGHA.2064@TK2MSFTNGP09.phx.gbl...
Bonjour.
Essaie :
ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways
Cordialement.
Daniel
"myname" <nospam@ihatespam.com> a écrit dans le message de news:
440440e8@news.sncf.fr...
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture,
j'utilise la ligne suivante dans l'événement Open :
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a coché "Modification / Confirmation de la mise à jour".
"Daniel" a écrit dans le message de news:u%
Bonjour. Essaie : ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Cordialement. Daniel "myname" a écrit dans le message de news:
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
Daniel
Alors j'ai ça qui passe avec un fichier lié ouvert :
Private Sub Workbook_Open() ActiveWorkbook.UpdateLink Type:=xlLinkTypeExcelLinks ActiveWorkbook.UpdateLink Type:=xlLinkTypeOLELinks End Sub
Daniel "myname" a écrit dans le message de news:
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a coché "Modification / Confirmation de la mise à jour".
"Daniel" a écrit dans le message de news:u%
Bonjour. Essaie : ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Cordialement. Daniel "myname" a écrit dans le message de news:
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
Alors j'ai ça qui passe avec un fichier lié ouvert :
Private Sub Workbook_Open()
ActiveWorkbook.UpdateLink Type:=xlLinkTypeExcelLinks
ActiveWorkbook.UpdateLink Type:=xlLinkTypeOLELinks
End Sub
Daniel
"myname" <nospam@ihatespam.com> a écrit dans le message de news:
44045794@news.sncf.fr...
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée
au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a
coché
"Modification / Confirmation de la mise à jour".
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de
news:u%23RuD2GPGHA.2064@TK2MSFTNGP09.phx.gbl...
Bonjour.
Essaie :
ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways
Cordialement.
Daniel
"myname" <nospam@ihatespam.com> a écrit dans le message de news:
440440e8@news.sncf.fr...
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture,
j'utilise la ligne suivante dans l'événement Open :
Alors j'ai ça qui passe avec un fichier lié ouvert :
Private Sub Workbook_Open() ActiveWorkbook.UpdateLink Type:=xlLinkTypeExcelLinks ActiveWorkbook.UpdateLink Type:=xlLinkTypeOLELinks End Sub
Daniel "myname" a écrit dans le message de news:
Justement non, je veux éviter que la question "Mettre à jour ?" soit posée au début, or, elle le sera avec xlUpdateLinksAlways si l'utilisateur a coché "Modification / Confirmation de la mise à jour".
"Daniel" a écrit dans le message de news:u%
Bonjour. Essaie : ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Cordialement. Daniel "myname" a écrit dans le message de news:
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
michdenis
Bonjour MyName,
Explications sur la mise à jour des liens avec un autre classeur
Les 3 options suivantes, c'est ce que l'on retrouve dans la fenêtre liaisons ( barre des menus / édition / liaisons / bouton de commande "Invite de démarrage".
Elles sont présentes sauf erreur depuis la version 2002 d'excel.
nous amène à la fenêtre où l'on peut choisir l'une des options suivantes
1) ActiveWorkbook.UpdateLinks = xlUpdateLinksUserSetting Laisser les utilisateurs choisir d'afficher ou non l'alerte
2) ActiveWorkbook.UpdateLinks = xlUpdateLinksNever Ne pas afficher l'alerte et ne pas mettre à jour...
3) ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Ne pas afficher l'alerte et mettre à jour
Ces mises à jour des données, selon l'option que l'on a choisie se font à l'ouverture du fichier seulement. Cependant, il est possible de forcer ces mises à jour par code à n'importe quel moment.
Pour mettre à jour les données avec un fichier source bien identifié, on peut utiliser ceci : '------------------------ With ThisWorkbook .UpdateLink Name:=" C : AtravailClasseur1.xls", Type:=xlExcelLinks End With '------------------------
Pour mettre à jours tous les liens du classeur '------------------------- With ThisWorkbook Liens =. LinkSources(xlExcelLinks) For Each lelien In Liens .UpdateLink Name:=lelien, Type:=xlExcelLinks Next End With ' -- -- ------ -- ------ -- ----- En dernier lieu, Excel fait une différence entre les types de liens
A) xlLinkTypeOLELinks : Représente par exemple, le copier-coller avec liaison d'un texte de l'application Word.
B) XlLinkType : Représente les liens que l'on retrouve au niveau des formules dans les cellules, Plage nommée, et séries d'un graphe!
Pour mettre à jour un lien Ole, on utilise les mêmes procédures, mais avec cette constante xlLinkTypeOLELinks au lieu de xlExcelLinks
enfin, pour ceux qui possèdent une version un peu plus âgée (2000 et - ), ils ne peuvent compter que sur ce qui suit au sujet des mises à jour à l'ouverture du classeur : Application.AskToUpdateLinks = True impose à Excel de demander à l'utilisateur, à chaque ouverture d'un fichier possédant des liaisons, s'il souhaite mettre à jour ces liaisons.
Application.AskToUpdateLinks = False Excel va mettre à jour automatiquement les liaisons.
Et pour finir, qu'est-ce qui se passe si dans la même procédure, on utilise ceci qui par définition devrait être contradictoire : '---------------------------- With ThisWorkbook .UpdateLinks = xlUpdateLinksNever End With Application.AskToUpdateLinks = True ' -- -- -- ------ ------ ------ ---- ET bien, Excel ne demande rien à l'ouverture ! xlUpdateLinksNever a gagné.
Ce qui précède est valide pour les ouvertures de classeurs qui se ne font pas par macro. (double-clic dans l'explorateur Windows, Menu fichier/open/...
Par macro, il y a dans la méthode "Open" qui accepte un paramètre que l'on peut définir : Workbooks.Open Filename:=x, UpdateLinks:=True 'or fausse
Ce paramètre a préséance lorsqu'il est défini sur tous les autres paramètres dont il a été question dans ce texte.
Salutations!
"myname" a écrit dans le message de news: Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
Tout va bien sauf quand un fichier référencé est déjà ouvert, auquel cas j'obtiens une erreur 1004.
Comment adapter mon code pour qu'il ne plante pas dans ce cas ?
Merci !
Bonjour MyName,
Explications sur la mise à jour des liens avec un autre classeur
Les 3 options suivantes, c'est ce que l'on retrouve dans la fenêtre
liaisons ( barre des menus / édition / liaisons / bouton de commande "Invite de démarrage".
Elles sont présentes sauf erreur depuis la version 2002 d'excel.
nous amène à la fenêtre où l'on peut choisir l'une des options suivantes
1) ActiveWorkbook.UpdateLinks = xlUpdateLinksUserSetting
Laisser les utilisateurs choisir d'afficher ou non l'alerte
2) ActiveWorkbook.UpdateLinks = xlUpdateLinksNever
Ne pas afficher l'alerte et ne pas mettre à jour...
3) ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways
Ne pas afficher l'alerte et mettre à jour
Ces mises à jour des données, selon l'option que l'on a choisie se font à l'ouverture
du fichier seulement. Cependant, il est possible de forcer ces mises à jour par
code à n'importe quel moment.
Pour mettre à jour les données avec un fichier source bien identifié, on peut
utiliser ceci :
'------------------------
With ThisWorkbook
.UpdateLink Name:=" C : AtravailClasseur1.xls", Type:=xlExcelLinks
End With
'------------------------
Pour mettre à jours tous les liens du classeur
'-------------------------
With ThisWorkbook
Liens =. LinkSources(xlExcelLinks)
For Each lelien In Liens
.UpdateLink Name:=lelien, Type:=xlExcelLinks
Next
End With
' -- -- ------ -- ------ -- -----
En dernier lieu, Excel fait une différence entre les types de liens
A) xlLinkTypeOLELinks : Représente par exemple, le copier-coller
avec liaison d'un texte de l'application Word.
B) XlLinkType : Représente les liens que l'on retrouve au niveau
des formules dans les cellules, Plage nommée, et
séries d'un graphe!
Pour mettre à jour un lien Ole, on utilise les mêmes procédures, mais
avec cette constante xlLinkTypeOLELinks au lieu de xlExcelLinks
enfin, pour ceux qui possèdent une version un peu plus âgée (2000 et - ),
ils ne peuvent compter que sur ce qui suit au sujet des mises à jour à
l'ouverture du classeur :
Application.AskToUpdateLinks = True
impose à Excel de demander à l'utilisateur,
à chaque ouverture d'un fichier possédant des liaisons, s'il
souhaite mettre à jour ces liaisons.
Application.AskToUpdateLinks = False
Excel va mettre à jour automatiquement les liaisons.
Et pour finir, qu'est-ce qui se passe si dans la même procédure,
on utilise ceci qui par définition devrait être contradictoire :
'----------------------------
With ThisWorkbook
.UpdateLinks = xlUpdateLinksNever
End With
Application.AskToUpdateLinks = True
' -- -- -- ------ ------ ------ ----
ET bien, Excel ne demande rien à l'ouverture !
xlUpdateLinksNever a gagné.
Ce qui précède est valide pour les ouvertures de classeurs qui se ne font pas par macro.
(double-clic dans l'explorateur Windows, Menu fichier/open/...
Par macro, il y a dans la méthode "Open" qui accepte un paramètre que l'on peut définir :
Workbooks.Open Filename:=x, UpdateLinks:=True 'or fausse
Ce paramètre a préséance lorsqu'il est défini sur tous les autres paramètres dont il a été
question dans ce texte.
Salutations!
"myname" <nospam@ihatespam.com> a écrit dans le message de news: 440440e8@news.sncf.fr...
Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture,
j'utilise la ligne suivante dans l'événement Open :
Explications sur la mise à jour des liens avec un autre classeur
Les 3 options suivantes, c'est ce que l'on retrouve dans la fenêtre liaisons ( barre des menus / édition / liaisons / bouton de commande "Invite de démarrage".
Elles sont présentes sauf erreur depuis la version 2002 d'excel.
nous amène à la fenêtre où l'on peut choisir l'une des options suivantes
1) ActiveWorkbook.UpdateLinks = xlUpdateLinksUserSetting Laisser les utilisateurs choisir d'afficher ou non l'alerte
2) ActiveWorkbook.UpdateLinks = xlUpdateLinksNever Ne pas afficher l'alerte et ne pas mettre à jour...
3) ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways Ne pas afficher l'alerte et mettre à jour
Ces mises à jour des données, selon l'option que l'on a choisie se font à l'ouverture du fichier seulement. Cependant, il est possible de forcer ces mises à jour par code à n'importe quel moment.
Pour mettre à jour les données avec un fichier source bien identifié, on peut utiliser ceci : '------------------------ With ThisWorkbook .UpdateLink Name:=" C : AtravailClasseur1.xls", Type:=xlExcelLinks End With '------------------------
Pour mettre à jours tous les liens du classeur '------------------------- With ThisWorkbook Liens =. LinkSources(xlExcelLinks) For Each lelien In Liens .UpdateLink Name:=lelien, Type:=xlExcelLinks Next End With ' -- -- ------ -- ------ -- ----- En dernier lieu, Excel fait une différence entre les types de liens
A) xlLinkTypeOLELinks : Représente par exemple, le copier-coller avec liaison d'un texte de l'application Word.
B) XlLinkType : Représente les liens que l'on retrouve au niveau des formules dans les cellules, Plage nommée, et séries d'un graphe!
Pour mettre à jour un lien Ole, on utilise les mêmes procédures, mais avec cette constante xlLinkTypeOLELinks au lieu de xlExcelLinks
enfin, pour ceux qui possèdent une version un peu plus âgée (2000 et - ), ils ne peuvent compter que sur ce qui suit au sujet des mises à jour à l'ouverture du classeur : Application.AskToUpdateLinks = True impose à Excel de demander à l'utilisateur, à chaque ouverture d'un fichier possédant des liaisons, s'il souhaite mettre à jour ces liaisons.
Application.AskToUpdateLinks = False Excel va mettre à jour automatiquement les liaisons.
Et pour finir, qu'est-ce qui se passe si dans la même procédure, on utilise ceci qui par définition devrait être contradictoire : '---------------------------- With ThisWorkbook .UpdateLinks = xlUpdateLinksNever End With Application.AskToUpdateLinks = True ' -- -- -- ------ ------ ------ ---- ET bien, Excel ne demande rien à l'ouverture ! xlUpdateLinksNever a gagné.
Ce qui précède est valide pour les ouvertures de classeurs qui se ne font pas par macro. (double-clic dans l'explorateur Windows, Menu fichier/open/...
Par macro, il y a dans la méthode "Open" qui accepte un paramètre que l'on peut définir : Workbooks.Open Filename:=x, UpdateLinks:=True 'or fausse
Ce paramètre a préséance lorsqu'il est défini sur tous les autres paramètres dont il a été question dans ce texte.
Salutations!
"myname" a écrit dans le message de news: Bonjour,
pour mettre à jour automatiquement un classeur à l'ouverture, j'utilise la ligne suivante dans l'événement Open :
