Bonjour au groupe,
Si des spécialistes peuvent m'aider, j'ai :
"Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions:
--------------------------------------------
Workbooks.Open FileName:=ListeName
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
---------------------------------------------
Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième
instruction lorsque je veux copier toutes les cellules de la feuille
Toutes les variables FileName, ListeName, SheetName sont bien initialisées.
Merci de votre aide.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Polio2004
J'ai toujours la même erreur après avoir remplacer FileName par ListeName. La feuille SheetName est bien présente.
"MichDenis" a écrit dans le message de news:
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName" existe réellement dans ton classeur.
"Polio2004" a écrit dans le message de news: % Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.
J'ai toujours la même erreur après avoir remplacer FileName par ListeName.
La feuille SheetName est bien présente.
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de news:
ekjGM4lCHHA.1012@TK2MSFTNGP04.phx.gbl...
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName"
existe réellement dans ton classeur.
"Polio2004" <Polio2004@wanadoo.fr> a écrit dans le message de news:
%23xsARylCHHA.5068@TK2MSFTNGP02.phx.gbl...
Bonjour au groupe,
Si des spécialistes peuvent m'aider, j'ai :
"Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions:
--------------------------------------------
Workbooks.Open FileName:=ListeName
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
---------------------------------------------
Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième
instruction lorsque je veux copier toutes les cellules de la feuille
Toutes les variables FileName, ListeName, SheetName sont bien
initialisées.
Merci de votre aide.
J'ai toujours la même erreur après avoir remplacer FileName par ListeName. La feuille SheetName est bien présente.
"MichDenis" a écrit dans le message de news:
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName" existe réellement dans ton classeur.
"Polio2004" a écrit dans le message de news: % Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.
MichDenis
Une erreur de type 9 refère à un objet qui est soit mal identifié ou qui est inexistant.
Si le classeur "ListeName" représente vraiment le nom et l'extension d'un fichier ouvert et que SheetName représente bien le nom d'un onglet du meme fichier que le fichier ListeName, il n'y a aucune raison que ta ligne de code se plante ...
"Polio2004" a écrit dans le message de news:
J'ai toujours la même erreur après avoir remplacer FileName par ListeName. La feuille SheetName est bien présente.
"MichDenis" a écrit dans le message de news:
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName" existe réellement dans ton classeur.
"Polio2004" a écrit dans le message de news: % Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.
Une erreur de type 9 refère à un objet qui est soit mal identifié
ou qui est inexistant.
Si le classeur "ListeName" représente vraiment le nom et l'extension
d'un fichier ouvert et que SheetName représente bien le nom d'un
onglet du meme fichier que le fichier ListeName, il n'y a aucune
raison que ta ligne de code se plante ...
"Polio2004" <Polio2004@wanadoo.fr> a écrit dans le message de news:
O5XiFNmCHHA.1196@TK2MSFTNGP02.phx.gbl...
J'ai toujours la même erreur après avoir remplacer FileName par ListeName.
La feuille SheetName est bien présente.
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de news:
ekjGM4lCHHA.1012@TK2MSFTNGP04.phx.gbl...
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName"
existe réellement dans ton classeur.
"Polio2004" <Polio2004@wanadoo.fr> a écrit dans le message de news:
%23xsARylCHHA.5068@TK2MSFTNGP02.phx.gbl...
Bonjour au groupe,
Si des spécialistes peuvent m'aider, j'ai :
"Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions:
--------------------------------------------
Workbooks.Open FileName:=ListeName
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
---------------------------------------------
Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième
instruction lorsque je veux copier toutes les cellules de la feuille
Toutes les variables FileName, ListeName, SheetName sont bien
initialisées.
Merci de votre aide.
Si le classeur "ListeName" représente vraiment le nom et l'extension d'un fichier ouvert et que SheetName représente bien le nom d'un onglet du meme fichier que le fichier ListeName, il n'y a aucune raison que ta ligne de code se plante ...
"Polio2004" a écrit dans le message de news:
J'ai toujours la même erreur après avoir remplacer FileName par ListeName. La feuille SheetName est bien présente.
"MichDenis" a écrit dans le message de news:
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy Remplace FileName par ListeName
Vérifies aussi que le nom de la feuille représentée par "sheetName" existe réellement dans ton classeur.
"Polio2004" a écrit dans le message de news: % Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.
joseph 17
Bonjour Polio2004, Après avoir ouvert ton classeur, peut-être faut-il que tu l'actives, ainsi que l'onglet, avant d'y faire référence. Joseph 17
"Polio2004" a écrit dans le message de news: %
Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.
Bonjour Polio2004,
Après avoir ouvert ton classeur, peut-être faut-il que tu l'actives, ainsi
que l'onglet, avant d'y faire référence.
Joseph 17
"Polio2004" <Polio2004@wanadoo.fr> a écrit dans le message de news:
%23xsARylCHHA.5068@TK2MSFTNGP02.phx.gbl...
Bonjour au groupe,
Si des spécialistes peuvent m'aider, j'ai :
"Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions:
--------------------------------------------
Workbooks.Open FileName:=ListeName
Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy
---------------------------------------------
Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième
instruction lorsque je veux copier toutes les cellules de la feuille
Toutes les variables FileName, ListeName, SheetName sont bien
initialisées.
Merci de votre aide.
Bonjour Polio2004, Après avoir ouvert ton classeur, peut-être faut-il que tu l'actives, ainsi que l'onglet, avant d'y faire référence. Joseph 17
"Polio2004" a écrit dans le message de news: %
Bonjour au groupe, Si des spécialistes peuvent m'aider, j'ai : "Erreur d'exécution 9. L'indice n'appartient pas à la sélection"
Voici le jeux d'instructions: -------------------------------------------- Workbooks.Open FileName:=ListeName Workbooks(FileName).Worksheets(SheetName).UsedRange.Copy --------------------------------------------- Mon fichier est bien ouvert, pas d'erreur. Elle se produit sur la 2ième instruction lorsque je veux copier toutes les cellules de la feuille Toutes les variables FileName, ListeName, SheetName sont bien initialisées. Merci de votre aide.