J'ai fait le 1er tuto et j'ai était un peu déstabilisé par le faite qu'il n'y est pas de son .... Mais j'ai continuer et voila que je viens de terminé le 2eme tuto et c'est vraiment EXTRAORDINAIRE ,FANTASTIQUE UN GRAND MERCIIIIIIIIIIIIIIIIIII.(Michel)
Bonjour, merci beaucoup pour ce commentaire. Il est vrai que sans le son cela paré plus difficile mais il est plus facile pour moi de faire la vidéo puis la commenter à l'écrit afin de ne rien oublier et ne pas dire de bêtise.
Salut Seb! Je reviens vers toi suite à un petit bug dont je n'ai aucune idee du pourquoi ou comment! Quand je tente de modifier un nom depuis le formulaire, cela change l'entete des colonnes par les valeurs rentrées dans le formulaire! Aurais tu une idee de comment regler ca? Autrement le programme est genial, je l ai developpe depuis et c est vraiment pratique!
Bonjour, n'avez vous pas oublier quelque chose dans le bouton modifier : Dim modif As Integer If Not ComboBox1.Value = "" Then Sheets("Feuil1").Select modif = ComboBox1.ListIndex + 2 Pouvez vous m’écrire le code pour votre bouton modifier ?
Private Sub CommandButton3_Click() Dim modif As Integer If Not ComboBox1.Value = "" Then Sheets("Sheet1").Select modif = ComboBox1.ListIndex + 2 Cells(modif, 1) = TextBox1.Value Cells(modif, 2) = ComboBox1.Value Cells(modif, 3) = TextBox11.Value Cells(modif, 4) = TextBox6.Value Cells(modif, 5) = TextBox2.Value Cells(modif, 6) = TextBox8.Value Cells(modif, 7) = TextBox9.Value Cells(modif, 8) = TextBox7.Value Cells(modif, 10) = TextBox3.Value Cells(modif, 11) = TextBox4.Value Cells(modif, 12) = TextBox5.Value Cells(modif, 13) = TextBox10.Value MsgBox ("Modification registered!") Else MsgBox ("Please Enter the Name of the person you are seeking!") Exit Sub End If Unload UserForm1 UserForm1.Show 0 End Sub
Une piste je pense, quand j'écrit moi même dans le combobox1, un nom qui n'est pas enregistrer dans le tableau cela provoque la même erreur que vous. Peut tu tester cela : If ComboBox1.MatchRequired = False Then MsgBox " Cette personne n'est pas enregistré " Else Ton code bouton modifier puis ajoute un end if en dessous du end if déjà présent Dit moi ce qu'il se passe bonne soirée
Merci A vous : bit.ly/2JffGfU
J'ai fait le 1er tuto et j'ai était un peu déstabilisé par le faite qu'il n'y est pas de son .... Mais j'ai continuer et voila que je viens de terminé le 2eme tuto et c'est vraiment EXTRAORDINAIRE ,FANTASTIQUE UN GRAND MERCIIIIIIIIIIIIIIIIIII.(Michel)
Bonjour, merci beaucoup pour ce commentaire. Il est vrai que sans le son cela paré plus difficile mais il est plus facile pour moi de faire la vidéo puis la commenter à l'écrit afin de ne rien oublier et ne pas dire de bêtise.
Merci Mon Ami
Claire net et précis même en étant muet.Merci cher Ami
Merci pour ce jolie commentaire
Bravo Seb !
Merci
Salut Seb!
Je reviens vers toi suite à un petit bug dont je n'ai aucune idee du pourquoi ou comment!
Quand je tente de modifier un nom depuis le formulaire, cela change l'entete des colonnes par les valeurs rentrées dans le formulaire! Aurais tu une idee de comment regler ca?
Autrement le programme est genial, je l ai developpe depuis et c est vraiment pratique!
Bonjour, n'avez vous pas oublier quelque chose dans le bouton modifier :
Dim modif As Integer
If Not ComboBox1.Value = "" Then
Sheets("Feuil1").Select
modif = ComboBox1.ListIndex + 2
Pouvez vous m’écrire le code pour votre bouton modifier ?
Private Sub CommandButton3_Click()
Dim modif As Integer
If Not ComboBox1.Value = "" Then
Sheets("Sheet1").Select
modif = ComboBox1.ListIndex + 2
Cells(modif, 1) = TextBox1.Value
Cells(modif, 2) = ComboBox1.Value
Cells(modif, 3) = TextBox11.Value
Cells(modif, 4) = TextBox6.Value
Cells(modif, 5) = TextBox2.Value
Cells(modif, 6) = TextBox8.Value
Cells(modif, 7) = TextBox9.Value
Cells(modif, 8) = TextBox7.Value
Cells(modif, 10) = TextBox3.Value
Cells(modif, 11) = TextBox4.Value
Cells(modif, 12) = TextBox5.Value
Cells(modif, 13) = TextBox10.Value
MsgBox ("Modification registered!")
Else
MsgBox ("Please Enter the Name of the person you are seeking!")
Exit Sub
End If
Unload UserForm1
UserForm1.Show 0
End Sub
mon probleme ne s applique que a la ComboBox 1 cependant, le reste est niquel
Difficile de t'aidez comme cela, pourrai tu héberger ton fichier et me donner le liens pour que je puisse y regarder.
Une piste je pense, quand j'écrit moi même dans le combobox1, un nom qui n'est pas enregistrer dans le tableau cela provoque la même erreur que vous.
Peut tu tester cela :
If ComboBox1.MatchRequired = False Then
MsgBox " Cette personne n'est pas enregistré "
Else
Ton code bouton modifier
puis ajoute un end if en dessous du end if déjà présent
Dit moi ce qu'il se passe
bonne soirée