erreur 380 formulaire vba excel

[nina71287]

Bonsoir à tous,

J'ai besoin d'aide sur mon code. j'ai l'erreur 380 qui s'affiche mais il ne me dit pas ou est mon erreur. Ci joint mon fichier.Si quelqu'un pouvait m'aider à situer mon erreur?
Merci d'avance et bonne soirée

 

[gilbert_RGI]

Re : erreur 380 formulaire vba excel

Bonsoir à tous,

J'ai besoin d'aide sur mon code. j'ai l'erreur 380 qui s'affiche mais il ne me dit pas ou est mon erreur. Ci joint mon fichier.Si quelqu'un pouvait m'aider à situer mon erreur?
Merci d'avance et bonne soirée

Bonjour

l'erreur est en Rouge

Private Sub Userform_initialize()
    Dim rng As Range
    Dim cell As Range
    'Affichage de la liste des services
    With ThisWorkbook.Worksheets("Services")
        .Activate
        Set rng = .Range("A1").CurrentRegion
        'Tri des services par ordre alphabétique
        rng.Sort key1:=Range("A1")
        LstPole.Clear
        For Each cell In rng
            If cell.Text <> "" Then
                LstPole.AddItem cell.Text
            Else
                Exit For
            End If
        Next cell
    End With
'    'Affichage de la liste des employés
    Affiche_Employés
    [COLOR="Yellow"][COLOR="Red"]LstEmployes.ListIndex = 0[/COLOR][/COLOR]
'    'Nouvel employé par defaut
    bnouveau = True
End Sub

Valeur de propriété incorrecte (Erreur 380)

 

[nina71287]

Re : erreur 380 formulaire vba excel

merci pour ta reponse.

C'est ce que je pensais aussi j'avais remarqué que si je modifiais mon 0 avec -1 ma liste des poles se remplissait en revanche celle des employés ne marche pas quand meme. Une idée?

Merci

 

[gilbert_RGI]

Re : erreur 380 formulaire vba excel

hello;

qq modifs

 

[nina71287]

Re : erreur 380 formulaire vba excel

merci beaucoup! bonne soirée

 

[gilbert_RGI]

Re : erreur 380 formulaire vba excel

merci beaucoup! bonne soirée

de rien il y a encore du boulot 😀

 

[nina71287]

Re : erreur 380 formulaire vba excel

je reviens vers vous je n'arrive décidément pas à avancer mon bouton valider ne marche pas aucune modification ou ajout d'employés ne se fait. si quelqu'un peut m'aider à avancer en m'expliquant les erreurs que j'ai faites merci 🙂

 

[gilbert_RGI]

Re : erreur 380 formulaire vba excel

je reviens vers vous je n'arrive décidément pas à avancer mon bouton valider ne marche pas aucune modification ou ajout d'employés ne se fait. si quelqu'un peut m'aider à avancer en m'expliquant les erreurs que j'ai faites merci 🙂

Bonjour,

un exit sub mal placé ne permettait pas le bon fonctionnement 🙄

 

[gilbert_RGI]

Re : erreur 380 formulaire vba excel

suite
je n'ai rien fait pour
LstContrat et TxtDateEntree

je ne sais pas ce que tu veux en faire

 

[nina71287]

Re : erreur 380 formulaire vba excel

merci beaucoup ca marche tres bien. j'ai complété la lstcontrat et le txtdate_entree en m'inspirant du code que tu m'avais modifié et ca marche.