Message d'erreur VBA Fermé

Question

Bonjour, 

Je tente d'écrire une macro permettant d'automatiser la mise à jour d'une feuille excel à partir de données d'une autre feuille excel. Mais je rencontre un message d'erreur.. Le message est : "L'indice n'appartient pas à la selection"

Voici le début de mon code :

Option Explicit 
Sub remplissage()

Dim F As Worksheet
Set F = Worksheets("Etudes")

......

Ce message apparait à la ligne Set F ...
Or, lorsque j'ouvre VisualBasic pour taper mon code, je suis bien dans le classeur contenant la feuilles "Etudes".
Je ne vois pas d'ou pourrait venir mon erreur...

Merci d'avance pour votre aide.

michel_m · Answer

Ta syntaxe est bonne
et le compilateur dit que "Etudes" n'existe pas
Donc, vérifie s'il n'y a pas d'espaces qui trainent sur le nom d'onglet dans la feuille (grand classique de l'emm....)

au besoin clic droit sur le nom d'onglet
renommer
ctrl+C (et non copier)
Echap
et tu colles dans la ligne en question

f894009 · Answer

Bonjour,

Je tente d'écrire une macro permettant d'automatiser la mise à jour d'une feuille excel à partir de données d'une autre feuille excel.

Meme classeur ou pas?????

MysteriousSkin · Answer

merci michel_m mais l'erreur persiste...

f894009, classeurs différents mais le classeur actif est celui contenant la feuille Etudes.

Dim F As Worksheet
Set F = Worksheets("Etudes")

Dim G As Worksheet
Workbooks.Open "C:\.........xls"
Set G = Worksheets("Recettes")

f894009 · Answer

Bonjour,
test avec deux classeurs, pas erreur du debut, mais modif du code pour la suite. Code utilise:

Sub test()
Dim F As Worksheet
Set F = Worksheets("Etudes")

Dim G As Worksheet, wkb As Workbook
Set wkb = Workbooks.Open("D:\_Docs_Prog_Excel\Excel_a_traiter\date_modif_cellule.xlsm")
Set G = wkb.Worksheets("Recettes")
End Sub

Il nous manque quelque chose

A+

MysteriousSkin · Answer

J'ai testé ton code mais le même message d'erreur apparait une nouvelle fois. 

Que veux-tu dire par "il nous manque quelque chose" ?

f894009 · Answer

Re,

Que veux-tu dire par "il nous manque quelque chose" ?

Il faudrait avoir votre fichier pour voir tout le contexte, parce que si cela marche chez nous (michel_m et moi-meme), il nous manque quelque chose par rapport a vous.

lien pour mise a dispo. (pas de donnees confidentielles)

https://www.cjoint.com/

A+

lermite222 · Answer

Bonjour tous,
Or, lorsque j'ouvre VisualBasic pour taper mon code, je suis bien dans le classeur contenant la feuilles "Etudes".
Pour être certain... essaye avec.
Set F = WorkBooks("NomClasseur.xls").sheets("Etudes")
A+

Message d'erreur VBA

7 réponses

Discussions similaires