Bonjour,
Pour éviter la boite de dialogue de mise à jour des liens à l'ouverture d' un fichier, je l'ouvre à partir d'un autre (Classeur1.xls, qui ne sert qu'a cela d'ailleur) dans lequel, en Workbook_Open j'ai mis ceci:
Dans le classeur2, en Feuil1 B3, j'ai une formule du genre:
='C:\mon dossier\mon sous dossier\[classeurexistepas.xls]feuilleexistepas'!$A$1
j'ai affecté à un bouton dans cette feuille1 une macro qui fait ceci:
Cette macro a pour effet de lancer la fenêtre de choix du fichier en suivant le chemin de
Chdir (C:\mon dossier\mon sous dossier)afin de faire le lien avec ma formule.
mon souci est que cela fonctionnait trés bien sous Excel 2000 (titre de fenêtre = "Fichier non trouvé") et que ça ne fonctionne pas avec 2003 ou 2007 (titre de fenêtre = "Mettre à jour les valeurs:.xls").
c'est en fait le chdir qui ne fonctionne plus et me propose bibliothéque/documents.
si quelqu' un peut m' aider à retrouver un bon fonctionnement quelle que soit la version, je l'en remercie d'avance.
Pour éviter la boite de dialogue de mise à jour des liens à l'ouverture d' un fichier, je l'ouvre à partir d'un autre (Classeur1.xls, qui ne sert qu'a cela d'ailleur) dans lequel, en Workbook_Open j'ai mis ceci:
Code:
Workbooks.Open "C:\mon dossier\mon sous dossier\Classeur2.xls", 0
Dans le classeur2, en Feuil1 B3, j'ai une formule du genre:
='C:\mon dossier\mon sous dossier\[classeurexistepas.xls]feuilleexistepas'!$A$1
j'ai affecté à un bouton dans cette feuille1 une macro qui fait ceci:
Code:
Private Sub CommandButton1_Click()
ThisWorkbook.Activate
Sheets("feuil1").Select
Range("b3").Select
Selection.Interior.ColorIndex = 5
ChDir "C:\mon dossier\mon sous dossier"
ActiveWorkbook.ChangeLink Name:= _
"C:\mon dossier\mon sous dossier\classeurexistepas.xls", NewName:= _
"C:\mon dossier\mon sous dossier\.xls", Type:= _
xlExcelLinks
End Sub
Cette macro a pour effet de lancer la fenêtre de choix du fichier en suivant le chemin de
Chdir (C:\mon dossier\mon sous dossier)afin de faire le lien avec ma formule.
mon souci est que cela fonctionnait trés bien sous Excel 2000 (titre de fenêtre = "Fichier non trouvé") et que ça ne fonctionne pas avec 2003 ou 2007 (titre de fenêtre = "Mettre à jour les valeurs:.xls").
c'est en fait le chdir qui ne fonctionne plus et me propose bibliothéque/documents.
si quelqu' un peut m' aider à retrouver un bon fonctionnement quelle que soit la version, je l'en remercie d'avance.