Bonjour à tous,
J'ai un petit soucis sur mon code VBA, voici un extrait :
Cela me note un erreur "l'indice n'appartient pas à la selection".Code:
1
2 Set O1 = Workbooks("Fichier 1.xlsx") Set O2 = Workbooks("Fichier 2.xls")
Version imprimable
Bonjour à tous,
J'ai un petit soucis sur mon code VBA, voici un extrait :
Cela me note un erreur "l'indice n'appartient pas à la selection".Code:
1
2 Set O1 = Workbooks("Fichier 1.xlsx") Set O2 = Workbooks("Fichier 2.xls")
Bonjour,
Ce message signifie que l'élément indicé (le nom entre guillemets) ne fait pas partie de la collection (ici les classeurs ouverts dans l'instance en cours).
Il faut donc d'abord ouvrir les classeurs.
Bonjour,
Le souci c'est que le fichier est ouvert
Bonjour,
Peut-être pas dans la même instance d'excel que ton classeur où est écrite ta procédure.Citation:
Le souci c'est que le fichier est ouvert
Insère ces lignes avant la ligne où tu as l'erreur et regarde si les classeurs sont repris dans la liste qui s'affiche.
Code:
1
2
3
4
5
6 Dim wkb As Workbook, txt As String txt = "Liste des classeurs ouverts" & vbCrLf For Each wkb In Workbooks txt = txt & vbCrLf & wkb.Name Next MsgBox txt