Alimenter cellule par textbox

Bonsoir à tous,

Encore un problème de textbox!!!

J'ai créer un userform qui doit remplir des données dans une feuille "Suivi" venant de textbox, mais il me les colle sur une autre feuille "accueil" pourtant mon code à l'air bon, "D’après moi"!!!!

Ci joint le fichier

Merci bien

Bonsoir

Remplaces la macro correspondante par celle-ci

Private Sub CommandButton1_Click()
'Bouton validez les donnes du jour
Dim Ligne As Long

  With Sheets("Suivi")
    Ligne = .Range("A" & Rows.Count).End(xlUp).Row + 1
    .Range("A" & Ligne).Value = TextBox5.Text
    .Range("B" & Ligne).Value = TextBox2.Value
    .Range("K" & Ligne).Value = CheckBox2.Value
  End With
  Unload Me
End Sub

Bonsoir Benzai

Merci bien

Cordialement Coco

Bonjour Benzai,

Petit problème avec mes checkbox, et une données qui ne veut pas ce mettre là ou je le désire!!!!

plus d'explication dans le fichier.

Merci d'avance Coco

Bonsoir

La propriété de la TextBox7 n'est pas adaptée : Je ne sais pas pourquoi

Remplacement par l'écriture directe et cela semble fonctionner

Pour tes CheckBox (qui à mon avis) devraient être des OptionButton (on fait du sport ou on n'en fait pas)

Le 1er affiche un Userform et le second affiche un message

Où est le problème

A tester

Bonsoir,

Merci pour ta reponse.

Encore une question, je viens de voir que lors de la saisie des données personnelle , la date de naissance apparait sur la feuille "données" à l'envers!!! taper dans userform 08/12/1978, afficher sur la feuille 12/08/1978 de quoi ce la peu venir, pourtant j' ai forcé le . text de la textbox! et même en jouant avec les propriétés de la cellule.

Merci Coco

Bonjour

Remplaces la ligne correspondante par celle-ci

 Sheets("Données").Range("A2") = CDate(TextBox1.Text)

Bonsoir Benzai,

Merci pour toutes ces réponses.

Coco