Erreur d'execution

Bonjour a tous,

j'ai besoin de votre aide j'ai une erreur d’exécution de la macro mais je ne c'est pas de ou sa viens

message erreur d’exécution 381

a l'ouverture du fichier ma première macro ce lance

par la seconde quand on clique sur login c'est la que l'erreur apparait

merci de votre aide

Bonjour

le problème vient de userform initialise de userform1

a priori il ne trouve pas tes noms d'utilisateurs.... (est ce que la feuille admin exsite??? car je ne la trouve pas le fichier....

pour faire un essai j'ai recreer une autre feuille et une nouvelle variable et la plus de soucis....

par contre tu n'as pas prévu de sortie de ce userform.... j'ai été obligé de planté excel pour ravoir la main....

fred

Private Sub UserForm_Initialize()
  Me.Utilisateur.List = Sheets("admin2").Range("Util").Value
  Me.Utilisateur.ListIndex = 0
End Sub

Bonjour

Je pense que tu emploies List avec une zone qui ne contient qu'un élément

A tester

Private Sub UserForm_Initialize()
  With Sheets("admin").Range("Utilisateur")
    If .Rows.Count = 1 Then
      Me.Utilisateur.AddItem .Cells(1, 1)
    Else
      Me.Utilisateur.List = Sheets("admin").Range("Utilisateur").Value
    End If
  End With
  Me.Utilisateur.ListIndex = 0
End Sub

Bonsoir,

Merci à vous =)

comment va tu banzai depuis le temps

Re

bonjour Banzai

Avec mon fichier test je reproduit la même erreur quand il n'y a qu'un seul nom de login......

donc ta réponse corrige le problème

A+

fred

Bonjour

C'est un problème que j'ai découvert maintenant

On apprend tous les jours

@ploz

Merci je vais calmement (mais sereinement) en ce moment