Problème incrémentation formulaire

  • Initiateur de la discussion Initiateur de la discussion Roni95
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Roni95

XLDnaute Occasionnel
Problème incrémentation n° de formulaire (code à modifier)

Bonjour,

Je souhaite modifier la façon d'incrémenter ce formulaire pour cette année mais je n'y arrive pas. L'ancienne forme était initiale prénom + initiale nom + 1 et je veux pour 2010 que ce soit initiale prénom + initiale nom avec 10 (pour 2010) accolé + un tiret (-) et +1.
Je ne sais pas si cela est très clair (voici le fichier excel avec en 1ère ligne l'ancienne forme et en seconde ligne celle que je souhaite)

Merci à tous

Pour accéder au fichier cliquez sur le lien ci-dessous et entrez les identifiants...
Fichier : Formulaire
Utilisateur : dft5lm1x
Mot de passe : l438px6s
 
Dernière édition:
Re : Problème incrémentation formulaire

Hello,

Pas pu télécharger ton fichier.

Mais j'imagine une ligne du style
Code:
InitialeNom & InitialePrenom + 1
Modifies la par
Code:
InitialeNom & InitialePrenom & "10 - " + 1
Cdt, Hulk.
 
Re : Problème incrémentation formulaire

Hello,

Pas pu télécharger ton fichier.

Mais j'imagine une ligne du style
Code:
InitialeNom & InitialePrenom + 1
Modifies la par
Code:
InitialeNom & InitialePrenom & "10 - " + 1
Cdt, Hulk.

Non, en fait le code est le suivant mais cela ne fonctionne pas lorsque je crée une troisième réclamation???

Code:
Private Sub UserForm_Initialize()
num = Split(Range("A65536").End(xlUp).Offset(0, 1).Value, " ")(1)
NdeReclam = Left(Trim(EnregPar), 1) & Mid(Trim(EnregPar), InStr(Trim(EnregPar), " ") + 1, 1) & "10-" & num + 1

Merci pour vos lumières 🙂
 
Dernière édition:
Re : Problème incrémentation formulaire

Désolé de vous relancer mais je n'arrive vraiment pas à modifier le code pour mes n° de réclamations pour ce début d'année et cela s'accumule s'en pouvoir les rentrer.

Help me please!!!

Merci
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour