Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier
non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille Clients
mais comment ajouter le nom du fichier ?
ComboBox1.RowSource = ("Clients!listeClient")
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
papou
Bonjour Il est possible de lire une plage de cellules d'un classeur fermé : http://perso.wanadoo.fr/frederic.sigonneau/code/Ado/ADOLireClasseurFerme.txt Mais dans ton cas, je te suggererais plutôt de faire simplement un lien dans le classeur vers ces valeurs. Cordialement Pascal
"Steph" a écrit dans le message de news:
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille Clients mais comment ajouter le nom du fichier ? ComboBox1.RowSource = ("Clients!listeClient")
Merci de votre aide,
Steph
Bonjour
Il est possible de lire une plage de cellules d'un classeur fermé :
http://perso.wanadoo.fr/frederic.sigonneau/code/Ado/ADOLireClasseurFerme.txt
Mais dans ton cas, je te suggererais plutôt de faire simplement un lien dans
le classeur vers ces valeurs.
Cordialement
Pascal
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de news:
elCkkMo4EHA.1400@TK2MSFTNGP11.phx.gbl...
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier
non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille
Clients mais comment ajouter le nom du fichier ?
ComboBox1.RowSource = ("Clients!listeClient")
Bonjour Il est possible de lire une plage de cellules d'un classeur fermé : http://perso.wanadoo.fr/frederic.sigonneau/code/Ado/ADOLireClasseurFerme.txt Mais dans ton cas, je te suggererais plutôt de faire simplement un lien dans le classeur vers ces valeurs. Cordialement Pascal
"Steph" a écrit dans le message de news:
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille Clients mais comment ajouter le nom du fichier ? ComboBox1.RowSource = ("Clients!listeClient")
Merci de votre aide,
Steph
Steph
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit
ouvert,
je veux juste pouvoir modifier cette ligne
ComboBox1.RowSource = ("Clients!listeClient")
afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma
macro.
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
papou
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
Re
Dans ces conditions, si les deux fichiers sont ouverts, indique directement,
en mode création du Userform, dans la propriété RowSource de ta combo, le
nom défini dans l'autre classeur.
Ca marche sans problème (testé Excel 2003)
Cordialement
Pascal
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de news:
OSCwI8o4EHA.2592@TK2MSFTNGP09.phx.gbl...
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit
ouvert,
je veux juste pouvoir modifier cette ligne
ComboBox1.RowSource = ("Clients!listeClient")
afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma
macro.
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
papou
Re Petite rectification après test un peu plus poussé ;-) en fait cela fonctionne uniquement si le classeur contenant la plage nommée est actif. Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit classeur avec l'évènement Initialize de ton userform ? Cordialement Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
Re
Petite rectification après test un peu plus poussé ;-)
en fait cela fonctionne uniquement si le classeur contenant la plage nommée
est actif.
Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit
classeur avec l'évènement Initialize de ton userform ?
Cordialement
Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
OQb2DCp4EHA.2600@TK2MSFTNGP09.phx.gbl...
Re
Dans ces conditions, si les deux fichiers sont ouverts, indique
directement, en mode création du Userform, dans la propriété RowSource de
ta combo, le nom défini dans l'autre classeur.
Ca marche sans problème (testé Excel 2003)
Cordialement
Pascal
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news: OSCwI8o4EHA.2592@TK2MSFTNGP09.phx.gbl...
Je me suis peut être mal fait comprendre, je veux bien que le fichier
soit ouvert,
je veux juste pouvoir modifier cette ligne
ComboBox1.RowSource = ("Clients!listeClient")
afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec
ma macro.
Re Petite rectification après test un peu plus poussé ;-) en fait cela fonctionne uniquement si le classeur contenant la plage nommée est actif. Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit classeur avec l'évènement Initialize de ton userform ? Cordialement Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
Michel Pierron
Bonjour Steph; "MonFichier.xls" doit être ouvert:
Private Sub UserForm_Initialize() Const Wbk As String = "MonFichier.xls" Me.ComboBox1.RowSource = RefersTo(Wbk, 1, "$A$1", "$A$5") End Sub
Private Function RefersTo(Wbk$, id%, Début$, Fin$) As String Dim Rng As String Rng = Workbooks(Wbk).Sheets(id).Name & "!" & Début & ":" & Fin RefersTo = "[" & Wbk & "]" & Rng End Function
MP
"Steph" a écrit dans le message de news:
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille Clients
mais comment ajouter le nom du fichier ? ComboBox1.RowSource = ("Clients!listeClient")
Merci de votre aide,
Steph
Bonjour Steph;
"MonFichier.xls" doit être ouvert:
Private Sub UserForm_Initialize()
Const Wbk As String = "MonFichier.xls"
Me.ComboBox1.RowSource = RefersTo(Wbk, 1, "$A$1", "$A$5")
End Sub
Private Function RefersTo(Wbk$, id%, Début$, Fin$) As String
Dim Rng As String
Rng = Workbooks(Wbk).Sheets(id).Name & "!" & Début & ":" & Fin
RefersTo = "[" & Wbk & "]" & Rng
End Function
MP
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news:elCkkMo4EHA.1400@TK2MSFTNGP11.phx.gbl...
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier
non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille
Clients
mais comment ajouter le nom du fichier ?
ComboBox1.RowSource = ("Clients!listeClient")
Private Sub UserForm_Initialize() Const Wbk As String = "MonFichier.xls" Me.ComboBox1.RowSource = RefersTo(Wbk, 1, "$A$1", "$A$5") End Sub
Private Function RefersTo(Wbk$, id%, Début$, Fin$) As String Dim Rng As String Rng = Workbooks(Wbk).Sheets(id).Name & "!" & Début & ":" & Fin RefersTo = "[" & Wbk & "]" & Rng End Function
MP
"Steph" a écrit dans le message de news:
Bonjour,
Y a t'il moyen de diriger un RowSource d'un ComboBox vers un autre fichier non ouvert ?
Voici le code pour diriger vers la zone listeClient dans la feuille Clients
mais comment ajouter le nom du fichier ? ComboBox1.RowSource = ("Clients!listeClient")
Merci de votre aide,
Steph
Steph
merci je test
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news: %
Re Petite rectification après test un peu plus poussé ;-) en fait cela fonctionne uniquement si le classeur contenant la plage nommée est actif. Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit classeur avec l'évènement Initialize de ton userform ? Cordialement Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
Merci
Steph
merci je test
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
%23x0LNFp4EHA.3596@TK2MSFTNGP12.phx.gbl...
Re
Petite rectification après test un peu plus poussé ;-)
en fait cela fonctionne uniquement si le classeur contenant la plage
nommée est actif.
Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit
classeur avec l'évènement Initialize de ton userform ?
Cordialement
Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
OQb2DCp4EHA.2600@TK2MSFTNGP09.phx.gbl...
Re
Dans ces conditions, si les deux fichiers sont ouverts, indique
directement, en mode création du Userform, dans la propriété RowSource de
ta combo, le nom défini dans l'autre classeur.
Ca marche sans problème (testé Excel 2003)
Cordialement
Pascal
"Steph" <stephane.stommen@technic-one.com> a écrit dans le message de
news: OSCwI8o4EHA.2592@TK2MSFTNGP09.phx.gbl...
Je me suis peut être mal fait comprendre, je veux bien que le fichier
soit ouvert,
je veux juste pouvoir modifier cette ligne
ComboBox1.RowSource = ("Clients!listeClient")
afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec
ma macro.
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news: %
Re Petite rectification après test un peu plus poussé ;-) en fait cela fonctionne uniquement si le classeur contenant la plage nommée est actif. Donc peut-être que dans ton cas il faudrait ajouter l'activation dudit classeur avec l'évènement Initialize de ton userform ? Cordialement Pascal
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Dans ces conditions, si les deux fichiers sont ouverts, indique directement, en mode création du Userform, dans la propriété RowSource de ta combo, le nom défini dans l'autre classeur. Ca marche sans problème (testé Excel 2003) Cordialement Pascal
"Steph" a écrit dans le message de news:
Je me suis peut être mal fait comprendre, je veux bien que le fichier soit ouvert, je veux juste pouvoir modifier cette ligne ComboBox1.RowSource = ("Clients!listeClient") afin de pouvoir lire dans un fichier que j'ouvrirais préalablement avec ma macro.
