Code VBA - Utilisation d'un formulaire

Bonjour à tous,

J’essaie un code VBA hyper-simple, et je bloque déjà. Qui peut m’aider ?

Toutes les infos sont inscrites dans le fichier.

https://www.excel-pratique.com/~files/doc2/Essai_formulaire_1.xls

A vous relire.

Bonjour,

Fais ceci

• Supprime la macro --> Public Sub essai_incrire_nom()
• dans l'Userform "formulaire yvouille", place le code ci-dessous :

Dim Lig as integer
Private Sub CommandButton1_Click()
'macro Dan poiur yvouille le 04/08/09
LIG = Sheets("Feuille").Range("A65536").End(xlUp).Row + 1
With ThisWorkbook.Worksheets("Feuille")
    .Cells(LIG, 1) = NOM_ENTRE.Value
    End With
NOM_ENTRE = ""
End Sub

CommandButton1 étant le bouton OK dans ton Userform

- Enregistre ton fichier et fais un essai

Amicalement

Dan

Super, merci Dan pour ton aide.

J'avais également demandé s'il était possible que le formulaire se referme si on clique "Annuler". Qui peut encore m'aider pour cela ?

https://www.excel-pratique.com/~files/doc2/Essai_formulaire_2.xls

Bonne journée à vous tous.

re,

1. Dans le formulaire, juste en dessous de la macro Private Sub CommandButton1_Click()

mets ce code :

Private Sub CommandButton2_Click()
Call fermer_formulaire
End Sub

2. Dans le module juste en dessous de la macro Public Sub affichage_formulaire() mets ce code :

Public Sub fermer_formulaire()
Unload Formulaire_Yvouille
End Sub

Amicalement

Dan

Ok, c'est ainsi parfait !

Dan, merci beaucoup pour ton aide et bonnes salutations.

Private Sub CommandButton2_Click()

Unload Me

End Sub