Corrigé formule

Bonjour,

j'ai crée un formulaire de saisie,

comme je suis nul en Excel je n'arrive pas à ouvrir le formulaire une fois que je clique sur formulaire pour encoder les donnée j'ai une erreur de compilation

attendus AS.

Merci de m'aider à corriger l'erreur

Excellente journée à tous

Bonjour

Allez dans le module 1 et supprimez l'instruction --> "Open formulaire" et remplacez la par le code OUVRIR ci-dessous

Cordialement

Edit : Sinon supprimez votre Rowsource (cela apporte parfois des soucis) et mettez ce code dans votre userform. La combobox ne reprendra que les items se trouvant sur la feuille

Private Sub UserForm_Initialize()
With Sheets("Feuil1")
    For i = 2 To .Range("B" & Rows.Count).End(xlUp).Row
        ComboBox1.AddItem .Range("B" & i).Value
    Next i
End With
End Sub

Dans votre module, liez ceci à votre bouton

Sub ouvrir()
Userform1.show
End sub

Bonjour

Ton fichier en retour

Bonjour

merci beaucoup ,

Bonne journée

Rechercher des sujets similaires à "corrige formule"