Salut à tous ! (me revoilà    )
 
J'ai un classeur Excel dans lequel j'ai une ribanbelle de macros.
Ce classeur est enregistré dans un certain répertoire... et dans ce même répertoire, j'ai d'autres classeurs.
Dans le premier classeur (PRINCIPAL.XLS), j'ai créé un menu dans lequel j'ai des options qui lancent des macros...
Je souhaite créer une macro pour ouvrir un autre classeur qui se trouve dans le même classeur (TOTO.XLS).
 
J'ai mis le code suivant pour le moment :
 

 
Malheureusement, j'ai le message "L'indice n'appartient pas à la sélection"...
Je pense que je dois rajouter le chemin avant TOTO.XLS mais ce que je veux c'est un truc "bateau" qui me permette de ne pas saisir le chemin car le fichier TOTO.XLS est dans le même répertoire que PRINCIPAL.XLS...
 
Quelqu'un a la soluce ?
 

bonjour
 
est ce ca te va ?
 
y = Workbooks("PRICIPAL.xls" ).FullName
x = Workbooks("PRINCIPAL.xls" ).Name
lg = Len(x)
chemin = Mid(y, 1, Len(y) - Len(x))
Workbooks.Open (chemin + "TOTO.xls" )

 
Salut à toi !
 
Je capte pas grand chose à ce que tu viens de mettre...    
Y'a vraiment pas plus simple comme code ?

J'ai essayé ça aussi...
 

 
Mais ça ne marche pas non plus : erreur 400
 

Alors, effectivement, quand j'insère le chemin complet (C:\...) entre la première guillemet et TOTO.XLS, le fichier s'ouvre...
Mais j'aimerais bien ne pas avoir à mettre le chemin... car le fichier appellé est dans le même répertoire...
Y'a pas moyen de mettre "...\"... ou un truc comme ça ?

je pense que cest le plus simple chez moi ca marche
y = Workbooks("PRINCIPAL.xls" ).FullName 'recupere le chemin de ton fichier excel genre "C:\documents\PRINCIPAL.xls"
x = Workbooks("PRINCIPAL.xls" ).Name 'recupere le nom du fichier excel "PRINCIPAL.xls"
lg = Len(x) 'len=longueur
chemin = Mid(y, 1, Len(y) - Len(x)) @recupere juste le chemin "C:\documents\"
Workbooks.Open (chemin + "TOTO.xls" )

 
Merci ton code marche parfaitement...    
Mais je trouve étonnant qu'il n'y est pas une commande plus simple...  

Salut,à placer ou il faut