Sujet Précédent Sujet Suivant

Vba excel

Fermé
ilhem1986 Messages postés 8 Date d'inscription vendredi 14 octobre 2016 Statut Membre Dernière intervention 20 octobre 2016 - 20 oct. 2016 à 11:19
ilhem1986 Messages postés 8 Date d'inscription vendredi 14 octobre 2016 Statut Membre Dernière intervention 20 octobre 2016 - 20 oct. 2016 à 13:41
Bonjour,

vba excel
je me bloque de nouveau,je veux aussi faire l incrémentation automatique dans un textbox sous forme "B"l'année ainsi "0000"par exemple l'année 2016 je veux le format"B16-0000".aidez moi svp j'ai pas beaucoup de temps

1 réponse

Réponse 1 / 1
jordane45 Messages postés 38314 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 24 novembre 2024 4 705
20 oct. 2016 à 11:23
Bonjour,

Il te suffit donc de récupérer les deux dernier chiffres de l'année et de concaténer le tout avec le reste de ta chaine.... 


Sub toto()

Dim maintenant As Date
Dim annee As String
Dim resultat As String

maintenant = Now()
annee = Right(Format(maintenant, "YYYY"), 2)

resultat = "B" & annee & "-0000"

MsgBox resultat

End Sub



0
ilhem1986 Messages postés 8 Date d'inscription vendredi 14 octobre 2016 Statut Membre Dernière intervention 20 octobre 2016
20 oct. 2016 à 12:00
merci bien Jordane mais pourrier vous m aidez plus ou pourrais je mettre cette marco ainsi comment je peux incrémenter à chaque nouveau enregistrement
0
jordane45 Messages postés 38314 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 24 novembre 2024 4 705 > ilhem1986 Messages postés 8 Date d'inscription vendredi 14 octobre 2016 Statut Membre Dernière intervention 20 octobre 2016
20 oct. 2016 à 12:56
Comme je ne sais pas à quoi ressemble ton fichier...
Ni ce que tu comptes en faire ...
Impossible de t'en dire plus.

Merci de faire un effort d'explications si tu souhaites obtenir de l'aide. Je ne suis malheureusement pas encore devin :-)
0
ilhem1986 Messages postés 8 Date d'inscription vendredi 14 octobre 2016 Statut Membre Dernière intervention 20 octobre 2016 > jordane45 Messages postés 38314 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 24 novembre 2024
20 oct. 2016 à 13:41
je m excuse je suis tellement boulversé de tel façon je explique pas alors mon classeur contient une feuiille de gestion de vente j'ai crée un userform pour saisir les bon de livraison dans un textbox 1 apres avoir saisi je les enregistre sur ma feuille.mes BL de cette année ont forme B16-0000 pour le 1 ere Bl ainsi de suite..je veux que lorsque je clique sur nouveau bl il m affiche le numero de bl suivant sur le textbox....merci d avance
0