Bonjour à tous,

Je dois réaliser un formulaire d'inscription en VBA.
Pour l'Userfrom chargé de l'inscription des utilisateurs, j'aimerai pouvoir envoyer le contenu de ma textbox nommé Loggin_Inscription dans la colonne A de ma feuille excel nommé Feuil1, lorsque je clique sur mon bouton validation nommé valid_inscription et le contenu de ma seconde textbox nommé PW_Inscription dans la colonne B.

(Autrement dit les personnes qui s’inscrivent doivent s'enregistrer les une à la suite des autres sans écraser la valeur de la dernière cellule enregistré)

Voici le code que j'ai écrit mais qui ne fonctionne pas :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub valid_inscription_Click()
'inscription d'un nouvel utilisateur
 
IntLigne = ActiveSheet.Cells(2, 1).End(xlDown).Row + 1
Dim Lg As String
'La ligne dans laquelle sont ajoutées les valeurs est définie par la TextBox nommé Loggin_Inscription
Lg = Sheets("Feuil1").Cells(65536, 1).End(xlUp).Row + 1
'texte des cases
Sheets("Feuil1").Cells(Lg, "A").Value = UserForm2.Loggin_Inscription.Value
Sheets("Feuil1").Cells(Lg, "B").Value = UserForm2.PW_Inscription.Value
 
 
End Sub

En espérant être assez claire, Merci d'avance