Liste pour LISTBOX dans un fichier fermé

[TETOCA]

Bonjour à toutes et à tous et bonne rentrée

Je remplis une Listbox avec le code :

With ListBox1
.RowSource = 'Feuill2!A12:C16'
End With[/color]

Je souhaite mettre l'origine de la liste dans un autre classeur. La syntaxe devient :

With ListBox1
.RowSource = ''[lignes devis.xls]Feuill2'!A12:C16'
End With

et cela fonctionne tant que le classeur annexe est ouvert.
Si je ferme le classeur annexe et adopte la syntaxe:

With ListBox1
.RowSource = ''C:\\CIP\\lignes devis\\[lignes devis.xls]Feuill2'!A12:C16'
End With

cela ne fonctionne plus.

Est-ce impossible ou me trompe-je dans la syntaxe, ou doit-on le faire avec autre chose que Rowsource ?

Merci de vos réponses et bonne journée à toutes et à tous.

 

[bebere]

bonjour Tetoca
commentaires dans le code
à bientôt [file name=ListboxAvecAdo.zip size=9041]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ListboxAvecAdo.zip[/file]

 

[TETOCA]

Bonjour bebere

Je vais décoder, car jamais utilisé ADO, et vous tiendrai au courant.

Grand merci et bonne journée.

 

[TETOCA]

Rebonjour bebere

Je suis navré de vous importuner à nouveau.

Je fais fonctionner mon remplissage de listbox en ouvrant et refermant le fichier source.

Mais désireux d'en savoir plus j'ai tout de même essayé de faire fonctionner ADO.

'Private Sub UserForm_Initialize()' appelle bien

'Private Function ReadDataFromWorkbook'

mais à la ligne

'Dim dbConnection As ADODB.Connection'

j'ai un message

'Erreur de compilation
Type défini par l'utilisateur non défini'

et je suis là, à la limite de mes connaissances.

Si vous avez un moment pour m'expliquer, je vous en serai reconnaissant, mais je comprendrais trés bien que vous ne souhaitiez pas perdre plus de temps.

En tous cas merci de vous être interessé à ma question.

Salutations les plus cordiales.

 

[TETOCA]

Re

J'ai un peu avancé.

Je suis allé dans 'Outils, références' et j'ai coché 'Microsoft ADO'.
Je n'ai plus cette erreur mais une autre dont je cherche l'origine.

Merci et bonne fin de journée

 

[MichelXld]

bonjour Tetoca , bonjour Bebere

tu dois prealablement activer la reference 'Microsoft ActiveX Data Objects x.x Library'
(xx.x depend de la version installée sur ton poste )

dans l'editeur de macros
Menu Outils
References
Coches la ligne 'Microsoft ActiveX Data Objects x.x Library'
Cliques sur OK


bon week end
MichelXld

 

[TETOCA]

Bonjour MichelXld

Oups, nos courriers se sont croisés.

Merci à tous de votre aide.

 

[MichelXld]

rebonjour Tetoca

ci joint un autre exemple qui permet d'alimenter un Combobox(meme principe de fonctionnement qu'une Listbox) à partir de données d'un classeur fermé


Lien supprimé

Lien supprimé


bon week end
MichelXld

 

[TETOCA]

Rebonjour à tous

CA MARCHE!

Je n'ai pas trés bien compris dans 'références' ily a plusieurs
'Microsoft ActiveX Data Objects x.x Library'
J'ai coché la version 2.7 mais il y en a d'autres?

Grand merci à tous et bonne fin de journée.

 

[TETOCA]

Bonsoir à tous.

Journée trés profitable grâce à vous.

Je pense avoir tout ce qu'il me faut en ayant récupéré les deux fils.

Vous êtes formidable.

Encore merci.

 

[bebere]

bonjour à tous
raté les débats,car absent toute la journée
mais je vois que le résultat est positif
donc pas trop de egrets
à bientôt à tous