maninwhite
XLDnaute Occasionnel
Bonjour à toutes et à tous
Je reviens vers vous avec une petite question, qui je l'espère, n'est pas trop compliquée.
J'ai crée un fichier excel avec des userforms qui permet de remplir un formulaire.
A la fin toutes les données sont enregistrées dans un tableau excel.
Et j'ai également un code qui permet de donner un numéro pour chaque nouveau formulaire crée.
Le problème est que le numéro est attribué une fois le formulaire crée et non pas à l'ouverture de celui ci.
Ce que j'aimerai faire :
Remplir la colonne de A3 à A... avec les numéros de 1 à ... et que lorsque j'ouvre le formulaire, j'affiche le numéro dans une textbox.
Rien de compliqué, sauf que bien entendu j'ai une variable.
Sans variable le code serait :
Mais à chaque fois j'aurai le même num alors que moi je veux que ce soit incrémené à chaque nouveau formulaire.
Merci
Je reviens vers vous avec une petite question, qui je l'espère, n'est pas trop compliquée.
J'ai crée un fichier excel avec des userforms qui permet de remplir un formulaire.
A la fin toutes les données sont enregistrées dans un tableau excel.
Et j'ai également un code qui permet de donner un numéro pour chaque nouveau formulaire crée.
Code:
Sheets("report").Activate
With Sheets("report")
If Range("A3").Value = "" Then
Range("A3").Value = 1
Else: .Cells(.Cells(Rows.Count, "A").End(xlUp).Row + 1, "A") = .Cells(.Cells(Rows.Count, "A").End(xlUp).Row, "A") + 1
End If
End With
Le problème est que le numéro est attribué une fois le formulaire crée et non pas à l'ouverture de celui ci.
Ce que j'aimerai faire :
Remplir la colonne de A3 à A... avec les numéros de 1 à ... et que lorsque j'ouvre le formulaire, j'affiche le numéro dans une textbox.
Rien de compliqué, sauf que bien entendu j'ai une variable.
Sans variable le code serait :
Code:
Range("A3").Value = Textbox_num
Mais à chaque fois j'aurai le même num alors que moi je veux que ce soit incrémené à chaque nouveau formulaire.
Merci