Référence personnalisée textbox

Debutant.VBA Messages postés 9 Date d'inscription   Statut Membre Dernière intervention   -  
Debutant.VBA Messages postés 9 Date d'inscription   Statut Membre Dernière intervention   -
bonjour le forum

UN GRAND MERCI A f894009 ET ThauTheme

SVP,
J'ai un USF qui me permet d'alimenter un tableau. Je souhaiterais qu'à chaque utilisation une référence automatique soit attribuée dans TextBox27 mais avec un format personnalisé.
aussi changeable à chaque identification.

exemple: (01CIV-0001-2017) ; (01CIV-0002-2017) ; (01CIV-0003-2017) ainsi de suite

voici le code que j'ais inscris:

TextBox27 = "01CIV-" & Format(Val(Max + 1), "0000") & Format(Now(), "-yyyy")


malheureusement ça ne change pas ça reste toujours : 01CIV-0001-2017)

merci de m'aidé

voir pièce jointe

https://www.cjoint.com/c/GDtrbSpPdNM
A voir également:

2 réponses

mushu14 Messages postés 8085 Date d'inscription   Statut Contributeur Dernière intervention   1 092
 
salut,
mais punaise pourquoi vous vous sentez obligés de crier dans votre titre ?
merci de le modifier en minuscules !!!

le retour II
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour,

Le souci .. c'est que ta variable max est initialisée nul-part...


0
Debutant.VBA Messages postés 9 Date d'inscription   Statut Membre Dernière intervention  
 
oupf je suis novice les amis je me retrouve pas

merci de corrigé pour SVP
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752 > Debutant.VBA Messages postés 9 Date d'inscription   Statut Membre Dernière intervention  
 
ben je ne sais pas ....
Tu pourrais la déclarer en global dans un modul ... ou te servir d'une cellule excel pour la stocker .. à toi de voir.
0
Debutant.VBA Messages postés 9 Date d'inscription   Statut Membre Dernière intervention   > jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention  
 
j'essayer de faire à ma manière mais ça ne marche pas pour moi


SVP veuillez corriger dans ce fichier joint si dessou


https://www.cjoint.com/c/GDtrbSpPdNM
0