"L'indice n'appartient pas à la sélection"

Fermé
I'm Someone Messages postés 44 Date d'inscription vendredi 7 juin 2013 Statut Membre Dernière intervention 15 juillet 2016 - 15 juil. 2016 à 14:40
I'm Someone Messages postés 44 Date d'inscription vendredi 7 juin 2013 Statut Membre Dernière intervention 15 juillet 2016 - 15 juil. 2016 à 16:37
Bonjour,

Je suis débutante en VBA, et je ne parviens pas à comprendre l'erreur de ce code (erreur correspondant au titre) :

Workbooks("ExportBudget (10) - Copie.xls").Sheets("ExportBudget").Range("Organisation") = Workbooks("Classeur3.xls").Sheets("Feuil1").Range("Organisation")

Le nom des deux classeurs correspondant bien à ceux dans le code (à part peut être le .xls , cela pourrait-il venir de là ?), pareil pour le nom des feuilles, et j'ai bien une sélection nommée "Organisation" dans chacun des tableaux. Peut être le code en soit est incorrect, je souhaite simplement importer le contenu de la colonne "Organisation" du tableau ExportBudget dans la colonne du même nom du tableau Classeur3.

Merci d'avance !
A voir également:

3 réponses

NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 331
15 juil. 2016 à 15:21
Sélectionne une partie (cohérente) de ta ligne et fais Shift+F9 pour voir la valeur et voir quelle partie ne fonctionne pas.
0
I'm Someone Messages postés 44 Date d'inscription vendredi 7 juin 2013 Statut Membre Dernière intervention 15 juillet 2016
15 juil. 2016 à 16:30
Je n'y arrive pas, enfin toute la ligne pose problème et je n'arrive pas à identifier la partie qui ne fonctionne pas ...
0
ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 2 404
Modifié par ccm81 le 15/07/2016 à 16:18
Bonjour

Essaies plutot comme ceci
Workbooks("F1.xls").Sheets(1).Range("plage").Copy Workbooks("F2.xls").Sheets(1).Range("plage").Cells(1, 1)

RQ. les 2 fichiers doivent être ouverts dans la même session d'excel (tu dois les voir tous les deux avec Fenêtre)

Cdlmnt
0
I'm Someone Messages postés 44 Date d'inscription vendredi 7 juin 2013 Statut Membre Dernière intervention 15 juillet 2016
15 juil. 2016 à 16:35
Merci de ta réponse, mais ça ne marche pas, et oui les deux fichiers sont bien ouverts dans la même session d'Excel ...
0
I'm Someone Messages postés 44 Date d'inscription vendredi 7 juin 2013 Statut Membre Dernière intervention 15 juillet 2016
15 juil. 2016 à 16:37
Je me suis rabattue sur ce code, qui fonctionne mais qui n'est pas très pratique, si il y a moyen de le raccourcir je suis preneuse :

Sub copie_organisation()
Windows("F1").Activate
Workbooks("F1").Sheets("ExportBudget").Range("Organisation").Select
Selection.Copy
Windows("Classeur3").Activate
Workbooks("Classeur3").Sheets("Feuil1").Range("Organisation").Select
ActiveSheet.Paste
End Sub
0