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

Modélisation Discussion :

Numéro auto personnalisé


Sujet :

Modélisation

  1. #1
    Membre à l'essai
    Homme Profil pro
    Conseil - Consultant en systèmes d'information
    Inscrit en
    novembre 2018
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 32
    Localisation : France, Pyrénées Orientales (Languedoc Roussillon)

    Informations professionnelles :
    Activité : Conseil - Consultant en systèmes d'information
    Secteur : Communication - Médias

    Informations forums :
    Inscription : novembre 2018
    Messages : 10
    Points : 10
    Points
    10
    Par défaut Numéro auto personnalisé
    Bonjour,
    Je sais pouvoir compter sur chacun de vous pour résoudre mes petits soucis...

    J'aurai une toute petite question mais qui me semble TRES dur a réaliser...
    Je ne suis pas un chevronné du tout mais rien de très recherché dans ma demande non plus: une toute petite base ACCES que je réalise,

    J'aimerai que mon numéro ID de ma table (disons numéro de facture) soit automatique (c'et la clé) mais personnalisé du type ANNEE-MOIS-00X

    J'ai lu avec beaucoup d'attention le tutoriel (ici) mais je n'y arrive pas.

    Quelqu’un aurait il la gentillesse de m'expliquer pas à pas que faire s'il vous plait?

    Merci beaucoup

  2. #2
    Membre expert
    Homme Profil pro
    Webplanneur
    Inscrit en
    octobre 2007
    Messages
    2 118
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 55
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Webplanneur

    Informations forums :
    Inscription : octobre 2007
    Messages : 2 118
    Points : 3 132
    Points
    3 132
    Par défaut
    Salut
    Soit la table tblFacture(idfact, datefact, indice, numfact, etc.)
    Copiez le code ci-dessous dans l'environnement vba de form facture
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    Private Sub Form_BeforeUpdate(Cancel As Integer)
    Dim oRst As DAO.Recordset
    If Me.NewRecord Then
        Set oRst = CurrentDb.OpenRecordset("SELECT Max(indice) FROM tblFacture WHERE Format(datefact,""yyyy"")=" & Chr(34) & Format(Me.datefact, "yyyy") & Chr(34))
            With oRst
                If Not .EOF Then
                Me![indice].Value = Nz(.Fields(0).Value, 0) + 1
                Else
                Me![indice].Value = 1
                End If
                .Close
            End With
    End If
    If IsNull(Me.indice.Value) Then
        Me.indice.Value = Format(Nz(DMax("[indice]", "[tblFacture]", "Year([datefact])='" & Year([datefact]) & "'"), 0) + 1)
    End If
        Me.numfact.Value = "FAC-" & Year([datefact]) & "-" & Format([datefact], "mm") & "-" & Format([indice], "000")
    End Sub

Discussions similaires

  1. [AC-2010] Numéro auto personnalisé
    Par scoobydoos dans le forum Modélisation
    Réponses: 7
    Dernier message: 29/11/2010, 16h47
  2. [AC-2003] Numéro Auto Personnalisé
    Par campello dans le forum Modélisation
    Réponses: 1
    Dernier message: 06/05/2009, 15h02
  3. Comment faire un numéro auto??
    Par the_new dans le forum MS SQL Server
    Réponses: 4
    Dernier message: 01/03/2005, 17h49
  4. INSERT INTO numéro auto.
    Par Pfeffer dans le forum Langage SQL
    Réponses: 9
    Dernier message: 17/02/2005, 20h04
  5. Numéro auto ===== Question bête
    Par Nicos77 dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 16/06/2003, 14h04

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