Bonjour à tous
Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre
classeur.
Je ne connait pas le nombre d'onglet et il peut éventuellement changé.
Pour ce type de macro je suis largué.
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 Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
Bonjour
Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à
récupérer) ouvert au préalable, code à inclure dans ton Userform :
Private Sub UserForm_Initialize()
With Workbooks("Classeur1.xls")
For i = 1 To .Sheets.Count
Me.ComboBox1.AddItem .Worksheets(i).Name
Next i
End With
End Sub
Cordialement
Pascal
"Christian" <Christian@discussions.microsoft.com> a écrit dans le message de
news: 8EBA1015-38AA-46B6-B57A-A2AB687E616E@microsoft.com...
Bonjour à tous
Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre
classeur.
Je ne connait pas le nombre d'onglet et il peut éventuellement changé.
Pour ce type de macro je suis largué.
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
Christian
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreure "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
Bonjour Pascal
Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des
onglets
, j'ai une erreure "variable non définie"'i"
Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt
Christian
Bonjour
Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à
récupérer) ouvert au préalable, code à inclure dans ton Userform :
Private Sub UserForm_Initialize()
With Workbooks("Classeur1.xls")
For i = 1 To .Sheets.Count
Me.ComboBox1.AddItem .Worksheets(i).Name
Next i
End With
End Sub
Cordialement
Pascal
"Christian" <Christian@discussions.microsoft.com> a écrit dans le message de
news: 8EBA1015-38AA-46B6-B57A-A2AB687E616E@microsoft.com...
Bonjour à tous
Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre
classeur.
Je ne connait pas le nombre d'onglet et il peut éventuellement changé.
Pour ce type de macro je suis largué.
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreure "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
Michel Gaboly
Bonsoir,
Parce que tu as choisi "Déclaration explicite des variables" dans les o ptions ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize() Dim i as integer With Workbooks("Classeur1.xls") ...
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreur "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userfor m : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le mes sage de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un aut re classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement chang é. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
-- Cordialement,
Michel Gaboly www.gaboly.com
Bonsoir,
Parce que tu as choisi "Déclaration explicite des variables" dans les o ptions ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize()
Dim i as integer
With Workbooks("Classeur1.xls")
...
Bonjour Pascal
Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des
onglets
, j'ai une erreur "variable non définie"'i"
Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt
Christian
Bonjour
Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à
récupérer) ouvert au préalable, code à inclure dans ton Userfor m :
Private Sub UserForm_Initialize()
With Workbooks("Classeur1.xls")
For i = 1 To .Sheets.Count
Me.ComboBox1.AddItem .Worksheets(i).Name
Next i
End With
End Sub
Cordialement
Pascal
"Christian" <Christian@discussions.microsoft.com> a écrit dans le mes sage de
news: 8EBA1015-38AA-46B6-B57A-A2AB687E616E@microsoft.com...
Bonjour à tous
Peut-on récupérer dans un combobox(UF) le nom des onglets d'un aut re
classeur.
Je ne connait pas le nombre d'onglet et il peut éventuellement chang é.
Pour ce type de macro je suis largué.
Parce que tu as choisi "Déclaration explicite des variables" dans les o ptions ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize() Dim i as integer With Workbooks("Classeur1.xls") ...
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreur "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userfor m : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le mes sage de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un aut re classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement chang é. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
-- Cordialement,
Michel Gaboly www.gaboly.com
Christian
Merci a vous 2 ça fonctionne christian
Bonsoir,
Parce que tu as choisi "Déclaration explicite des variables" dans les options ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize() Dim i as integer With Workbooks("Classeur1.xls") ...
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreur "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
Si qq a une idée Merci
Christian
-- Cordialement,
Michel Gaboly www.gaboly.com
Merci a vous 2
ça fonctionne
christian
Bonsoir,
Parce que tu as choisi "Déclaration explicite des variables" dans les options ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize()
Dim i as integer
With Workbooks("Classeur1.xls")
...
Bonjour Pascal
Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des
onglets
, j'ai une erreur "variable non définie"'i"
Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt
Christian
Bonjour
Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à
récupérer) ouvert au préalable, code à inclure dans ton Userform :
Private Sub UserForm_Initialize()
With Workbooks("Classeur1.xls")
For i = 1 To .Sheets.Count
Me.ComboBox1.AddItem .Worksheets(i).Name
Next i
End With
End Sub
Cordialement
Pascal
"Christian" <Christian@discussions.microsoft.com> a écrit dans le message de
news: 8EBA1015-38AA-46B6-B57A-A2AB687E616E@microsoft.com...
Bonjour à tous
Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre
classeur.
Je ne connait pas le nombre d'onglet et il peut éventuellement changé.
Pour ce type de macro je suis largué.
Parce que tu as choisi "Déclaration explicite des variables" dans les options ce qui est une bonne chose
Ajoute une ligne :
Private Sub UserForm_Initialize() Dim i as integer With Workbooks("Classeur1.xls") ...
Bonjour Pascal Lorsque je met le code ds le classeur(classeur2) qui récupère le nom des onglets , j'ai une erreur "variable non définie"'i" Par contre çà fonctionne lorsque le code est ds le classeur1
Cdlt Christian
Bonjour Avec le classeur "Classeur1.xls" (contenant les noms de feuilles à récupérer) ouvert au préalable, code à inclure dans ton Userform : Private Sub UserForm_Initialize() With Workbooks("Classeur1.xls") For i = 1 To .Sheets.Count Me.ComboBox1.AddItem .Worksheets(i).Name Next i End With End Sub
Cordialement Pascal
"Christian" a écrit dans le message de news:
Bonjour à tous Peut-on récupérer dans un combobox(UF) le nom des onglets d'un autre classeur. Je ne connait pas le nombre d'onglet et il peut éventuellement changé. Pour ce type de macro je suis largué.
