Discussion :

[lmagnet]

Bonjour à tous,

Je cherche désespérément à utiliser les fonctions Match entre deux fichiers Excel différents de la façon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Const NOM_FICHIER As String = "Planning.xlsx"
 
Dim Ligne As Integer
Dim Compteur As Integer
 
Compteur = 1
 
Ligne = WorksheetFunction.Match(Workbooks("NOM_FICHIER").Sheets("Modele 1-2").Range("C" & Compteur), Workbooks("Formations & Rotations.xlsx").Sheets("Rotations").Range("C:C").Value, 0)

Le problème de cette instruction est qu'elle me retourne une "Erreur d’exécution '9': L'indice n'appartient pas à la sélection". J'ai pourtant vérifié que tous les chaines de caractères entre " " correspondent bien aux noms des fichiers et des feuilles dans lesquels je veux effectuer ma recherche.

Je sais pertinemment que mon instruction est à rallonge mais je souhaiterais comprendre où se trouve l'erreur avant de la réduire. Evidemment j'ai le même problème avec les fonctions VLookUp et HLookUp.

Restant à votre entière disposition pour éclaircir ce qui pourrait ne pas être clair, je vous souhaite à tous une excellente après-midi.

[Jean-Philippe André]

Salut,

attention, l'extension correcte est xlsx et non pas xlxs

[Promethee25]

Bonjour,

Je ne sais pas si tu as supprimé des lignes mais dans ton exemple, compteur n'est pas initialisé donc il vaut 0: tu attaques donc la case C0...

[lmagnet]

J'ai effectivement supprimé des lignes mais dans mon code j'initialise bien mon compteur à 1.

Quant à l'extension, bien vu ça aurait en effet pu être ça mais la modification ne change rien, ça me retourne toujours le même message d'erreur

Est-il possible qu'il me manque une instruction sachant que le fichier "Planning.xlsx" est un fichier partagé ?

[Jean-Philippe André]

Une fois les corrections sur le format et le numero faites, peut-on voir ton code actuel mis a jour stp ?

[lmagnet]

J'ai modifié le code directement dans mon premier poste... (Ca ne se fait peut être pas... Si c'est le cas, désolé)