Vba excel

ilhem1986 Messages postés 9 Statut Membre -  
ilhem1986 Messages postés 9 Statut Membre -
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

  1.
    jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
     
    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
    1. ilhem1986 Messages postés 9 Statut Membre
       
      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
      1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830 > ilhem1986 Messages postés 9 Statut Membre
         
        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
      2. ilhem1986 Messages postés 9 Statut Membre > jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention  
         
        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