B
B52
Guest
Bonjour le forum,
J'affiche à l'aide d'un bouton mon userform1, dans la textbox1 j'incrémente un numéro (çà marche très bien) et dans la textbox2, je veux afficher la date du jour, mais là ça ne marche pas à chaque ouverture de mon USF...et je ne vois pas pourquoi... si vous avez la solution, je suis preneur, par avance merci.
@+ Stéphane
Ps:Voici mon code
Sub Acceuil_Bouton1_QuandClic()
Worksheets("Feuil1").Select
Rows(4).Select
Selection.Insert
valeur = Range("A5")
With UserForm1
.TextBox1.Value = valeur + 1
.TextBox2.Value = Format(Now, "DD/MM/YY")
.ComboBox1.Text = ""
End With
UserForm1.Show
End Sub
J'affiche à l'aide d'un bouton mon userform1, dans la textbox1 j'incrémente un numéro (çà marche très bien) et dans la textbox2, je veux afficher la date du jour, mais là ça ne marche pas à chaque ouverture de mon USF...et je ne vois pas pourquoi... si vous avez la solution, je suis preneur, par avance merci.
@+ Stéphane
Ps:Voici mon code
Sub Acceuil_Bouton1_QuandClic()
Worksheets("Feuil1").Select
Rows(4).Select
Selection.Insert
valeur = Range("A5")
With UserForm1
.TextBox1.Value = valeur + 1
.TextBox2.Value = Format(Now, "DD/MM/YY")
.ComboBox1.Text = ""
End With
UserForm1.Show
End Sub