Valider les donnees & Passage à la ligne Suivante

Bonjour à tous, je n'y connais pas grand chose en excel, mais j'essai de m'y mettre...

J'ai un blocage sur la conception de mon ficher

- Lorsque je remplie mon formulaire j'aimerai lorsque j'appuie sur le bouton "VALIDER" que cela enregistre les données et passer à la ligne suivante X fois.

- Une fois les données enregistrées j'aimerais faire un tri des differentes combinaisons du type 1/N/2

Avez vous une idée des fonctions à utiliser ?

Merci bien...

Salut,

Tu parles de ton formulaire, mais ton fichier en comporte deux. Je présume donc que tu parles du UserForm "lotofoot".

Dans le fichier ci-joint, j'ai placé un bouton qui permet de l'ouvrir. Une fois ouvert, que veux-tu y inscrire dans le TextBox1 (premier champ dans lequel tu peux inscrire quelque chose) ? Ensuite, peux-tu choisir plusieurs variantes (1, N, 2) ou seulement une des trois ?

Quand tu cliqueras sur "Valider", où faut-il reporter les choix effectués dans cette forme ?

Pour le tri je te propose que l'on voit ça plus tard.

Cordialement.

Bonjour Yvouille ! Merci pour votre réponse !

Voici mon fichier modifié, j'ai enlevé la textbox, car je peux modifier les matchs manuellement, ou mettre match 1,2 etc...cela ne pose pas de souci.

Ensuite, peux-tu choisir plusieurs variantes (1, N, 2) ou seulement une des trois ?

--------> Nous pouvons effectivement choisir plusieurs variantes

Quand tu cliqueras sur "Valider", où faut-il reporter les choix effectués dans cette forme ?

--------> Une fois appuyer sur "Valider" il faut que les résultats soient reportés dans la ligne 4, Aprés validation on doit pouvoir passer automatiquement au remplissage de la ligne 5, Etc, Etc, Etc......

Ok pour le tri nous verrons aprés !

Voici mon nouveau fichier V2 ! )

Ca va mieux ainsi ? Il y a probablement plus simple, mais je ne sais pas faire autrement

Ok super oui ca marche !Merciiii !!

n'y a t'il pas un moyen de garder le formulaire ouvert ? Car la il faut a chaque fois appuyer sur le bouton ouvrir le formulaire, il faudrait que la boite de dialogue reste ouverte. je seche..

Aussi pensez vous qu'il y ait un moyen de colorer les cellules ?

quand 1 Cellule en rouge

quand N Cellule en bleu

quand 2 Cellule en jaune

merci pour votre aide Yvouille!

Bonjour

Aucun mérite, juste pour simplifier le code

Private Sub CommandButton1_Click()
Dim J As Long
Dim I As Integer

  J = Columns("A:U").Find("*", , , , xlByRows, xlPrevious).Row + 1
  For I = 1 To 19 Step 3
    If Me.Controls("CheckBox" & I) = True Then Cells(J, I) = "1"
    If Me.Controls("CheckBox" & I + 1) = True Then Cells(J, 1 + I) = "N"
    If Me.Controls("CheckBox" & I + 2) = True Then Cells(J, 2 + I) = "2"
  Next I

'Unload Me

End Sub

Bah si .... j'ai du mal a percuter la programmation ...

Ok ca marche le formulaire reste en place, par contre les cases restent cochées .. il faudrait repartir à zero aprés ca sera parfait grace a vous !!

Comme tu vas me demander d'ajouter des bordures lorsque les lignes sont utilisées, je prends les devants, pour une fois

Edit : Salut Banzai, je n'avais pas vu ton message. Effectivement que ça gagne en simplicité

Bonjour

Tout le mérite revient à Yvouille moi juste un opportuniste

Private Sub CommandButton1_Click()
Dim J As Long
Dim I As Integer

  J = Columns("A:U").Find("*", , , , xlByRows, xlPrevious).Row + 1
  For I = 1 To 19 Step 3
    If Me.Controls("CheckBox" & I) = True Then
      Cells(J, I) = "1"
      Cells(J, I).Interior.ColorIndex = 3
    End If
    If Me.Controls("CheckBox" & I + 1) = True Then
      Cells(J, 1 + I) = "N"
      Cells(J, 1 + I).Interior.ColorIndex = 5
    End If
    If Me.Controls("CheckBox" & I + 2) = True Then
      Cells(J, 2 + I) = "2"
      Cells(J, 2 + I).Interior.ColorIndex = 6
    End If
  Next I

  For I = 1 To 21
    Me.Controls("CheckBox" & I) = False
  Next I

'Unload Me

End Sub

Super

les couleurs c'est plus sympas quand meme !!!

Merci bien yvouille ! Je vais mettre le sujet en resolu !

Super

les couleurs c'est plus sympas quand meme !!!

Merci bien yvouille ! Je vais mettre le sujet en resolu !

Ah oui moi non plus j'avais pas vu Banzai ! merci encore !