Affichage et modification Combobox

Bonjour,

Voici certainement une question de débutant (débutant que je suis !), mais je n'arrive pas à trouver la réponse, tant sur le Net que dans des bouquins :?

Dans un formulaire, j'ai une combobox que je souhaite alimenter par des données qui se trouvent dans une autre feuille du même classeur, en l'occurence la 4ème (la liste des données peut varier dans le temps). Voici le code :

Code:

---

1 2 3 4 5 6 7

Private Sub UserForm_Initialize() ' Alimentation de la ComboBox avec les données contenues dans la colonne des exclus Dim DerniereLigne As String DerniereLigne = ThisWorkbook.Worksheets(4).Range("B1").End(xlDown).Address ' Contenu de la listbox cmbListeAdresses cmbListeAdresses.RowSource = "B2:" & DerniereLigne End Sub

---

Ce code fonctionne très bien si la feuille de données est activée (les données sont affichées), mais ne fonctionne pas dans le cas contraire (les données ne sont pas affichées puisque le code fait a priori appel à la feuille active). Il serait facile d'activer cette feuille, mais je ne le souhaite pas pour que le traitement soit transparent pour les utilisateurs (la feuille est cachée). Comment faire ?

Merci d'avance pour vos réponses.
Bruno

Windows XP Pro SP2

Bonjour,


Essai en ajoutant la feuille dans le rowsource

Code:

---

cmbListeAdresses.RowSource = "Feuil4!B2:" & DerniereLigne

---

Bonjour Jérôme,

Merci beaucoup, ça marche nickel :ccool:

Je laisse le fil ouvert car je sens d'autres questions poindrent à propos de cette combobox.

Je pensais revenir, je ne m'étais hélas pas trompé because beaucoup de lacunes :?

Dans la foulée de l'affichage des données dans la combobox, je souhaite pouvoir ajouter ou supprimer des données via le formulaire qui contient la combobox, puis trier les données après chaque ajout. Comme indiqué plus haut, ces données sont stockées dans une feuille cachée d'un classeur. Et comme précédemment :
- si cette feuille est activée, l'ajout de donnée et le tri s'effectuent sans problème
- si elle n'est pas activée, je ne peux qu'ajouter la donnée, mais pour le tri, j'obtiens le message d'erreur suivant :

"Erreur d'exécution '1004':

La méthode Select de la classe Range a échoué"

Voici le code utilisé qui vient en complément du code déjà donné.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub cmdAjouter_Click() ' Déclaration de variables Dim Colonne As Range Dim LigneAjout As Integer ' Définition de la première ligne vide pour ajouter la nouvelle adresse saisie LigneAjout = ThisWorkbook.Worksheets(4).Range("B1").End(xlDown).Row + 1 ' Ajout de l'adresse saisie via le formulaire ThisWorkbook.Worksheets(4).Range("B" & LigneAjout).Value = cmbListeAdresses.Value ' Remise à blanc du champ de saisie cmbListeAdresses.Value = "" ' Curseur sur le champ de saisie cmbListeAdresses.SetFocus ' Tri de la liste des adresses mail ' Définition de la variable colonne (= données de la colonne B) Set Colonne = ThisWorkbook.Worksheets(4).Range("B1").CurrentRegion Colonne.Select ' Tri croissant avec prise en compte de la ligne de titre Colonne.Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlYes End Sub

---

Comme précédemment, je voudrais que la feuille de données ne s'affiche pas pendant le tri.

Merci pour votre aide.

Je ne pense pas que tu puisses faire autrement que d'afficher la feuille si tu veux utiliser la fonction tri d'excel dessus.
Par contre, si tu ne souhaites pas que la feuille apparraisse lors du traitement, tu peux utiliser la propriété ScreenUpdating

Code:

---

1 2 3 4 5

Application.ScreenUpdating = False   'ton code   Application.ScreenUpdating = true

---

Bonjour Jérôme,

Merci. J'ai testé ta solution, mais je n'ai pas vu de grande différence ... notamment parce que l'opération est hyper rapide. Finalement, je me prends la tête pour rien. J'ai donc activé la feuille 4, fait ma mixture et rappelé la feuille 1.

Pour mon info, peut-être y a-t-il une autre solution en n'utilisant pas le code que j'ai écrit ? Je pense à une variable tableau (domaine que je ne connais absolument pas !) qui pourrait stocker les données ... mais si c'est possible, est-ce qu'une telle variable garde les données en mémoire une fois le fichier Excel enregistré et fermé (ce serait l'idéal) ? En écrivant cela, je pense que j'écris une grosse bêtise et que je vais faire rire les spécialistes, mais tant pis ! C'est en écrivant ou en faisant des bêtises qu'on apprend, non ?

Citation:

---

C'est en écrivant ou en faisant des bêtises qu'on apprend, non ?

---

Tout a fait d'accord avec toi

Citation:

---

est-ce qu'une telle variable garde les données en mémoire une fois le fichier Excel enregistré et fermé

---

Une variable étant instantiée soit a l'ouverture du classeur soit dans une procedure (ou fonction), elle est détruite a la fermeture du classeur ou a la fin de la procedure.

Tu peux en effet faire un code qui triera tes données mais tu ne gagneras pas forcement en performance

Merci pour ta réponse et pour ta patience, car cette info sur les variables, c'est le B-A-BA et je devrais l'avoir gravé dans un coin de ma tête :oops: :oops: :oops: