Tri après usage Userform

Bonsoir Philippe,

J'ai lu cette contribution.
Bravo pour ce formulaire, je l'ai adapté à mes besoins, il manque juste une solution pour trier les données de la base après insertion, modification ou suppression...

Si vous avez une idée
Merci d'avance
Citaro

Bonjour Citaro,
Merci pour ton appréciation.

Citation:

---

il manque juste une solution pour trier les données de la base après insertion, modification ou suppression...
Si vous avez une idée

---

Il suffit d'ajouter une procédure de tri, dans la procédure événementielle cmdConfirm_Click du contrôle CommandButton nommé cmdConfirm
Pour l'exemple, j'utilise la procédure de tri que j'ai développée et que l'on peut trouver dans mes sources publiées.
Voici la procédure avec la ligne à ajouter (en rouge)

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub cmdConfirm_Click() If Not IsFieldsFilled Then Exit Sub Select Case UserFormStatus Case Status.NewRec ' Nouvel enregistrement WriteRecord rng.Rows.Count: InitData: InitRowSource Me.cboMember.ListIndex = rng.Rows.Count - 1 Case Status.Modify: WriteRecord CurrentRecord ' Modification de l'enregistrement End Select mSortTable2003.SortTable rng, "2" ' Tri su la deuxième colonne OppositeStatus ' Inverse la valeur booléenne des boutons d'action End Sub

---

Code:

---

mSortTable2003.SortTable rng, "2"

---

Bonjour Philippe

En ajoutant cette ligne
mSortTable2003.SortTable rng, "2"

J'obtiens une erreur variable non défini, sur mSortTable2003 ,peut-être je n'ai pas le même fichier que vous ?

Citaro

Bonjour,

Citation:

---

En ajoutant cette ligne
mSortTable2003.SortTable rng, "2"
J'obtiens une erreur variable non défini, sur mSortTable2003 ,peut-être je n'ai pas le même fichier que vous ?

---

Dans la ligne en question mSortTable2003 est le module où se trouve la procédure SortTable.
Si le module porte un autre nom, il faut le référencer autrement. La procédure peut être invoquée sans la faire précéder par le nom du module. Je fais systématiquement référence au module pour faciliter la maintenance.

Rebonjour,

Sur le fichier en téléchargement dans le post, il n'y a pas le module cité
Etant novice en VBA, je n'arrive pas à trouvé la solution

Cordialement

Bonjour,
J'ai écrit

Citation:

---

Pour l'exemple, j'utilise la procédure de tri que j'ai développée et que l'on peut trouver dans mes sources publiées.

---

En dessous de mon nom, il y a des étoiles et quatre boutons. Le troisième en partant de la gauche est celui qui te renvoie vers les sources que j'ai publiées et parmi celles-ci se trouve Procédure de tri - VBA Excel 2003-2010
La procédure que tu trouveras dans le classeur à télécharger est à copier dans le classeur où se trouve ton UserForm

Merci Philippe,

J'ai trouvé et réussi à adapter mon fichier

Bon dimanche
Citaro