Actualisation FORMULAIRE

Re,

Ok, cette fois j'ai compris mais je ne pourrais te faire ça que plus tard dans la soirée...

Ok pas de soucis

Merci à toi

Re,

la version 05 en pièce jointe...

3esteban-ep-v05.xlsm (142.46 Ko)

Merci ThauThème,

Ta version 05 est NICKEL.

Et va bien me servir ...

Bonjour ThauThème

Je suis sur le fichier version 05 afin de remettre à jour la gestion de mes enregistrements.

Peux-tu dans l'userform lié à la feuille paramètre.

Mettre par rapport au champ Type installation, le champ Site par ordre alphabétique

idem pour le champ Equipe mettre par ordre alphabétique le champ Nom

Merci à toi,

Re,

Dans la version 06 j'ai rajouté un code dans le composant ThisWorkbook qui à l'ouverture du classeur trie tous les tableaux structurés de l'onglet Paramètres et active par défaut l'onglet Enregistrement :

Private Sub Workbook_Open() 'à l'ouvertur du classeur
Dim OP As Worksheet 'déclare la variable OL (Onglet Paramètres)
Dim TS As ListObject 'déclare la variable TS (Tableau Structuré)
Dim PL As Range 'déclare la variable PL (PLage)

Set OP = Worksheets("Paramètres") 'définit l'onglet OP
For Each TS In OP.ListObjects 'boucle sur tous les tableaux structurés de l'onglet OP
    Set PL = Range(TS.Name) 'définit la plage PL
    PL.Sort PL.Columns(1), Header:=1 'tri la plage PL
Next TS 'prochain tableau structuré de la boucle
Worksheets("Enregistrement").Activate 'active l'onglet "Enregistrement"
End Sub

Cela permettra d'avoir les Équipes classées (et les autres aussi d'ailleurs).

Pour les Sites j'ai rajouté ce bout de code à la fin de Private Sub C4_Change() :

For I = 0 To C5.ListCount - 1 'boucle 1 : sur tous les élément de C5
    For J = 0 To C5.ListCount - 1 'boucle 2 : sur tous les élément de C5
        'si I est différent de J et l'élément I est inférieur à l'élément J, interverti les éléments
        If I <> J Then If C5.List(I) < C5.List(J) Then T = C5.List(I): C5.List(I) = C5.List(J): C5.List(J) = T
    Next J 'prochain élément de la boucle 2
Next I 'prochain élément de la boucle 1
2esteban-ep-v06.xlsm (149.22 Ko)

Re,

Cette après-midi je n'était pas dispo d'où mon retour tardif.

Je viens de vérifier la version 06 les listes sont inversées :

Concentrateurs > Ok

Fontaines pétillantes > Ok

Géothermie > Ok

Poste de traitement > Ok

Puits > Liste Réservoir

Réservoir > Liste Stations locales

Station locale > Liste Usines

Usine > Liste Puits

Merci à toi,

@+

Re,

Hé oui. C'est logique. Puisque j'ai fait trier tous les tableaux de l'onglet Paramètres à l'ouverture du classeur, il fallait que les les différentes listes soient dans le même ordre pour les Sites et les Équipes. Tout cela est corrigé dans la version 07 en pièce jointe.

6esteban-ep-v07.xlsm (150.18 Ko)

Bonjour,

Je viens de tester la version 07. Parfait les listes dans l'userform coïncide bien.

Il me reste plus qu'a recaler mes enregistrements qui étaient dans un tableau sporadique.

Je laisse le sujet ouvert au cas ou.

En tout les cas un grand Merci à toi.

@+

Rechercher des sujets similaires à "actualisation formulaire"