XL 2016 Recherche avec Userform

Gabriel.leroux82 · 23 Avril 2021

Bonjour,

Je réalise un calendrier des employés pour mon organisation, et je voulais intégrer une recherche par matricule dans un userform qui s'affiche l'ouverture du fichier et qui contient une vingtaine de boutons pour toutes types d'absences,
la recherche peut se faire à l'aide d'une macro qui fonctionne très bien et qui affiche la ligne correspondante à l'employé pour qu'il puisse la remplir à l'aide des boutons (userform)
Serait-il possible d'intégrer cette macro dans cet Userform.

Merci pour votre aide si précieux pour moi
Le fichier joint est une test seulement

Nairolf · 23 Avril 2021

Salut,

Je te propose ce code partiel (à ajouter au code du "Userform1") pour exécuté la recherche via le Userform (à noter que j'ai rajouter le contrôle "TextBox2" dans le "Userform1") :

VB:

Private Sub TextBox1_Change()
Dim derlig&
Dim c As Range

derlig = Range("A" & Rows.Count).End(xlUp).Row
Set c = Range("A7:A" & derlig).Find(TextBox1.Value, , xlValues, xlWhole)
If c Is Nothing Then
    TextBox2.Value = "Pas de résultat !"
Else
    TextBox2.Value = Range("B" & c.Row).Value
End If
End Sub

Gabriel.leroux82 · 23 Avril 2021

Merci pour votre réponse, mais cela n'a pas fonctionné, et je ne suis pas expert dans vba
Pourriez-vous l'inclure dans le fichier et faire un essai,
Merci beaucoup

Nairolf · 23 Avril 2021

Voici le fichier correspondant.

Gabriel.leroux82 · 23 Avril 2021

Merci encore pour votre aide
Mais, je voulais que la ligne de l'employé qui correspond au numéro s'affiche au complet sur le fichier excel pour qu'il puisse compléter son horaire, le but de faire ça, c'est que la liste contient plus qu'une centaine d'employés.
Merci pour votre aide et votre temps consacré.

XL 2016 Recherche avec Userform

Gabriel.leroux82

XLDnaute Nouveau

Pièces jointes

Nairolf

XLDnaute Accro

Gabriel.leroux82

XLDnaute Nouveau

Nairolf

XLDnaute Accro

Pièces jointes

Gabriel.leroux82

XLDnaute Nouveau

Discussions similaires