Reference autre classeur

[ALDER]

Bonjour a tous

Voila je voudrais prendre en reference des valeurs contenu dans un autre classeur. Je suis debutant...

Ma formule devrait correspondre a peu pres a ca, mais bien sur ca ne marche po... :

Dim i as integer
i = range('a1')

Range('b1') = Workbook('essai').Sheets(1).Range('C' & i).Value


Qu'est ce qui ne va pas ???

Merci a tous

 

[marco57]

Bonsoir Alder et le Forum,
Essaye donc d'ajouter un 's' à workbook pour obtenir

Dim i as integer
i = range('a1')

Range('b1') = Workbooks('essai').Sheets(1).Range('C' & i).Value


A+

Marco

 

[ALDER]

Re marco57, forum

Merci marco57, en effet ca semble mieux, mais il subsiste toujours un leger probleme (marqué erreur d'execution '9' l indice n'appartient pas a la selection'

Comment se fait il ??? :unsure: 🙁

Thx marco57

 

[marco57]

Re salut Alder,

Ajoute donc encore un '.xls' après ton nom de fichier.

A+

Marco

 

[ALDER]

Re marco57

Non, toujours pas...
Mais j'y pense , n'y a til pas un probleme dans le chemin d'acces du fichier.

(mes 2 classeurs sont dans un dossier appelé 'PROG' situé sur le bureau)

Merci

 

[ThomasR]

Bonjour ALDER, marco57,

ton fichier est ouvert ou fermé ?

si il est ouvert

Dim i As Integer
i = Range('a1')

Range('b1') = Workbooks('essai.xls').Worksheets(1).Range('C' & i).Value



je supose que dans a1 il y à le numéro de la ligne que tu cherche ?

@+
Thomas®

 

[ALDER]

Re marco57, Thomas(r)

Voila j'ai essayé ta soluce Thomas, mais ca ne marche toujours pas...

Bizarre ca , non ?
En effet, mon autre classeur est bien ouvert..

Que se passe t il ?

 

[marco57]

Re Bonsoir à tous,

Si tes deux classeurs sont bien ouverts, Vérifie que la valeur en A1 est bien un NOMBRE ENTIER inférieur à 32 767.
Il est fréquent qu'en ligne 1 on mette le titre des colonnes, c'est du texte donc ERREUR.
Si il est supérieur, tu dois déclarer ta variable as Long.
Il faut aussi que tu lances ta macro en étant dans la feuille qui contient la cellule A1 correspondante à ta variable i.
Si tu lances à partir de Microsoft Visual Basic, assure toi que la feuille active est la bonne.
ça marche très bien chez moi. Si ça marche pas chez toi après ces contrôles, transmets nous ton message d'erreur.

A+

Marco