Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Aide à Finaliser application Gestion de dates

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion aubelix
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

aubelix

XLDnaute Impliqué
Bonjour à tous les amis du Forum. 🙂

Tout d'abord un grand Merci à tous les bénévoles qui m'ont aidé à mettre
au point cette application : Affichage de feux rouges ou verts en fonction du délai restant des dates.

Elle fonctionne, mais en partie. Il y'a un bouton "MENU GENERAL"pour les diverses actions.

L'UsF_Consultation fonctionne très bien.
- Sur ce modèle, je voudrai adapter avec le même de type de code l'affichage de l'UserForm1 avec une Listview.

- Mise à jour des champs du UserForm1 en temps réel sans avoir à cliquer sur le bouton "Consulter la fiche".

- Dans l'UserForm "UsF_Recherches", trier par ordre croissant les numéros
et par ordre alphabétique lors de la séléction par les Combobox.

Pour votre info, les gifs animés doivent être copiés sous C:\TEMP

En espérant avoir de l'aide et vous en remerciant par avance.
Cordialement.
 

Pièces jointes

Trier par date Trier par votes
Re : Aide à Finaliser application Gestion de dates

Bonjour à tous les amis du Forum. 🙂

J'ai modifié mon projet. J'ai gardé un seul Userform et ajouté une Listview.
SVP, quelqu'un pourrait-il essayer de m'aider sur le code de la Listview en consultation. 😕
Nota: pour les Gifs animés, les placer sous C:\TEMP

Par avance Merci pour votre aide.
Cordialement.
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonjour à tous les amis du Forum. 🙂

Quelqu'un a-t-il un début de solution SVP ?
Par avance Merci pour votre aide.

Bon week-end ensoleillé à tous. 😎
Cordialement.
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonjour à tous les amis du Forum. 🙂

Dernière bouteille à la mer, avant abondon final de ce post. 😱

Merci par avance pour votre aide.
Bonne journée à tous
Cordialement.
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonjour,
Juste pour te dire que j'ai regardé, (et je ne suis pas le seul à priori) mais que j'ai rien compris
Où est le formulaire "UserForm1" dont tu parles ?
A quoi sert la listview dans le formulaire "Consultation" puisse qu'elle n'est pas utilisée ? De fait, il est difficile de l'adapter au formulaire "Recherche" !
A+
kjin
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonjour Kjin. 🙂

Merci pour l'intérêt que tu portes à mon problème.
Je vais essayer d'être bref et clair dans mes explications.
Reporte toi à mon envoi initial pour voir les 2 userforms.

Le but de cette application, est de prévenir sur des dates concernant
des habilitations qualité. Surveillance en temps réelle des échéances.

Comme tu le contaster, dans le post initial, il y'a en lançant le menu 2 options:
1) Consultattion individuelle via une combobox, on choisit un nom.
toutes les infos relatives à ce nom s'affichent.

2) Consultation globale, via la listview, on choisit un nom et on clique sur
afficher la fiche et les infos relatives à ce nom s'affichent.

Mon but d'avoir une vision globale des emplyés via la listview pour afficher les infos.
Cela m'évite d'avoir un doublon entre individuelle et globale.
Et surtout comme tu le constater, la consultation individuelle est plus travaillée à savoir:
les feux ne s'affichent que s'il y'a des dates.
Je n'arrive pas à adapter le second userform pour avoir le même résultat.
C'est pour cela que dans mes posts suivants, j'ai ajouté une listview à la consultation
individuelle pour faciliter le travail du bénévole sympa qui aurait pû m'aider.

Je me tiens à ta disposition pour d'amples explications.
Dans l'attente de votre aide, Merci par avance. 🙂
Cordialement.
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonsoir aubelix, Kjin

Pour le 1er fichier que tu as mis en PJ dans ton 1er message.

Exemple de code pour remplir les textboxs avec les données de la listview1 après avoir clicker sur un nom dans la première colonne. (listview1 dans le userform1, Consultation Globale)

Code: 
Private Sub ListView1_Click()

Dim k As Byte
With ListView1
TextBox1.Value = .SelectedItem.Text
  For k = 1 To 14
     Me.Controls("TextBox" & k + 1).Value = .SelectedItem.ListSubItems(k).Text
  Next
End With
'rajouter le code pour les webBrowsers et autres TextBoxs (TxtBx)
End Sub
Pour les WebBrowsers et autres Textboxs (TxtBx) je te laisse faire à priori c'est comme pour la recherche par nom.



Pour le classement dans le combobox1 du userform de Recherche:
Il faut utiliser par l'exemple la fonction de conversion CDBL pour convertir les données en nombre. Les combobox renvoient les données sous forme de texte.

Code: 
'.../...
 With ComboBox1
        For i = 0 To .ListCount - 1
            For j = 0 To .ListCount - 1
                If [B]CDbl[/B](.List(i)) < [B]CDbl[/B](.List(j)) Then
'.../...
Pour le combobox2 de ce même userform, avec des noms sans chiffres le tri devrait se faire correctement.

En espérant avoir compris ta demande.

A+
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Bonjour bqtr 🙂

Merci pour ta réponse et de t'intéresser à mon problème.
J'ai ajouté dans Userform1 les lignes de code, mais j'obtiens un message d'erreur.
Voir image écran jointe. Je te joint le fichier modiifé.

Par avance, Merci pour ton aide.
Cordialement.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re,

Le problème vient des numéros des textboxs, ils ne sont pas numérotés de la même façon que dans ton 1er fichier.

Il faut les numéroter de 1 à 15. Textbox1, Textbox2,......Textbox14,Textbox15.

A+
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re bqtr. 🙂

J'ai pourtant fait un copier-coller de UsF_Consultation vers UserForm1
pour avoir les mêmes noms de textbox...
J'ai vérifié, je ne vois pas de différence de noms à part le Combox1 qui est devenu TextBox1.

J'avoue être un peu perdu.😕
Merci pour ton aide.
Cordialement.
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re bqtr. 🙂

Ci-joint fichier modifié. En m'inspirant de ton code
+ une pincée du code de UsfConsultation ça foctionne ! 😱

Je l'ai fait à l'instinct...
Si tu peux jetter un oeil
Cordialement.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re,

Je persiste et je signe 😀😀😀, dans ton 1er fichier celui de ton 1er message les textboxs concernés sont nommés :

textbox1,textbox2,....textbox5, textbox6,.......textbox15

et NON un mélange comme celui de tes derniers fichier:

textbox1, textbox01, textbox2, textbox02, ..... textbox07, textbox08,...textbox15

La boucle ne peux donc pas fonctionner avec un textbox nommé : textbox05 ou 06 ou 09 par exemple.
La variable k prend comme valeur 1 puis 2 puis 3, 4, 5, .....10, 11, ...15
mais jamais 01, 02, 03, 04, ....

Là ça fonctionne car tu fais une recherche sur la feuille et tu remplis les textboxs un par un dans le code. Ceci est inutile si les textboxs sont correctement nommés de 1 à 15 comme dans ton 1er fichier.
La listview dans ce cas ne sert pas à grand chose, un simple combobox avec le nom des employés suffit.

En PJ ton 1er fichier, celui de ton 1er post.

A+
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re bqtr 🙂

Tu as entièrement raison.
J'ai fait évoluer les versions.
C'est toi qui est dans le vrai.

D'autre part, peux-tu STP m'aider à trier par ordre numérique
les numéros. J'ai ajouté ton code, mais j'ai des messages d'erreur.

Par avance Merci pour ton aide.
Cordialement.
 
Vote positif 0 Vote négatif
Re : Aide à Finaliser application Gestion de dates

Re,

Tu parles du USF de Recherche ?
Si c'est ça regarde les modifs dans le fichier.

- Les combobox 1 et 2 ont deux colonnes, la 1ère le nom ou le n°, la deuxième qui est masquée (largeur = 0) le n° de la ligne de la feuille DATA où se trouve la donnée de la colonne 1.

- J'ai modifié le nom des 9 premiers employés (employe_01, employe_02 ....) Le tri se fait correctement.

- J'ai changé les procédures Combobox_Change par Combobox_Click, c'est plus pratique.

A+
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

H
  • Question Question
XL 2016 Besoin d'aide pour la conception d'une application excel de gestion financière d'une école de formation de personnel médical
2
Réponses
21
Affichages
1 K
haulles
H
D
  • Question Question
Microsoft 365 Aide au publipostage et envoi en nombre de fichiers et/ou mails
Réponses
4
Affichages
479
DARRIEUX
D
N
  • Question Question
Microsoft 365 Gérer les doublons de la fonction "RANG"
2
Réponses
15
Affichages
1 K
mapomme
R
  • Question Question
Microsoft 365 problème incompatibilité de type 13 sur macro "couper - coller"
Réponses
6
Affichages
560
rh.finances
R
  • Résolu(e)
Microsoft 365 Aide sur MFC (conflit après ajout de données)
Réponses
8
Affichages
1 K
Véhuel
J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
655
JJ69
J
P
  • Résolu(e)
XL 2013 Mise en forme suite à utilisation de UserForm
Réponses
4
Affichages
816
PR.
P
V
  • Question Question
XL 2016 Filtre de plusieurs dates et moyenne
Réponses
8
Affichages
734
job75
S
  • Question Question
XL 2016 Besoin d'aide pour finaliser gestion courrier départ
Réponses
3
Affichages
1 K
senpai49
S
R
  • Question Question
Microsoft 365 Macro pour balayer une sélection de plusieurs lignes et colonnes et recherche de mots clefs
Réponses
6
Affichages
1 K
rogue
R
A
  • Résolu(e)
XL 2016 Graphique à partir de plusieurs tableaux
Réponses
4
Affichages
872
Alan28
A
  • Question Question
XL 2019 Solliciter Votre Aide Pour Finaliser Cette Application
Réponses
1
Affichages
836
Saalut
H
  • Résolu(e)
Microsoft 365 VBA - Instruction d'un feuillet Base de donnée à un autre
2
Réponses
21
Affichages
3 K
Heim
H
B
  • Résolu(e)
XL 2019 Ordre de remplissage cellules -> Sauvegarde de la ligne -> Déverrouillage Ligne suivante
Réponses
1
Affichages
852
Babass
B
  • Question Question
XL 2019 Pourriez-vous SVP m'aider à finaliser ce formulaire .Merci infiniment d'avance
2
Réponses
16
Affichages
2 K
Saalut
C
  • Question Question
Microsoft 365 Excel VBA *Besoin d'aide code erreur* "application de gestion suivis des dépenses de chantier".
Réponses
3
Affichages
1 K
Charloooon
C
  • Question Question
Microsoft 365 supprimer doublons à l'interieur des cellules et classer le texte restant par ordre de dates
Réponses
4
Affichages
811
Usine à gaz
M
  • Question Question
Problèmes pour finaliser mon projet
Réponses
5
Affichages
1 K
Moniato
M
F
  • Question Question
CHANGEMENT DE FORMULES AUTOMATIQUEMENT
2
Réponses
15
Affichages
2 K
Fidmo
F
L
  • Question Question
Base de donnée volontaires à répartir
Réponses
4
Affichages
2 K
Luke91
L
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…