IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Incrémenté une clé alphanumérique


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2007
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Octobre 2007
    Messages : 61
    Par défaut Incrémenté une clé alphanumérique
    Bonjour,

    voilà, j'ai une clé primaire alphanumérique (DEP=constante et 00000=var).
    Y-a-t'il une manière simple d'incrémenté ceci : DEP00001 => DEP00002=> ... en gardant le même nombre de caractère qui est de 8 ??? J'ai bien une solution avec des IF mais je la trouve un peu longue à mon gout.
    Quelqu'un aurait il une petite idée en VB ou générateur d'expression ????

    Merci d'avance


    Mmmuzik

  2. #2
    Membre expérimenté
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    226
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2007
    Messages : 226
    Par défaut
    Pour une bonne compréhension, je vais décortiquer ....
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    Dim tmpValue as variant
     
    'Extraire à partir du 4ième caractère
    'Convertir en Long et Incrémenter 
    tmpValue = CLng(Mid(TonNumero,4)) +1
    'Extraire les 3 premiers caractères et concaténer la nouvelle valeur en format "00000"
    TonNouveauNumero=Left(TonNumero,3) & Format(tmpValue,"00000")

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2007
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Octobre 2007
    Messages : 61
    Par défaut
    un grand merci mikeGo20, effectivement c'est bien plus simple qu'avec des IF, lol, encore merci

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [10gR2] Incrémentation d'une variable alphanumérique
    Par turbo_chess dans le forum SQL
    Réponses: 9
    Dernier message: 15/10/2013, 12h15
  2. Réponses: 13
    Dernier message: 19/08/2008, 17h41
  3. Incrémenter une variable en CR9
    Par nanouille56 dans le forum SAP Crystal Reports
    Réponses: 9
    Dernier message: 13/02/2007, 15h59
  4. [XSLT] incrémenter une variable
    Par nemya dans le forum XSL/XSLT/XPATH
    Réponses: 1
    Dernier message: 26/09/2005, 17h12
  5. [débutant][xsl]incrémenter une variable
    Par guitalca dans le forum XSL/XSLT/XPATH
    Réponses: 6
    Dernier message: 01/04/2003, 15h19

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo