Incrémentation

[czac]

Bonjour,
Pouvez-vous m'aider? ci-joint un fichier où j aimerais que la colonne A (N° BL) s'incrémente automatiquement au fur et à mesure où on va à la ligne.
sur la ligne 2, colonne A par exemple:
- SXB reste figé
- HKG sont des lettres que je mettrais manuellement
- 7701 c'est le chiffre qui doit s'incrémenter
- /17 c'est l'année

c'est 1 tableau par an, donc pour 2018 par exemple, le numéro qui doit s'incrémenter est nouveau.
Je suppose qu'il faut donc que la ligne 2 on note manuellement le chiffre et après tout se fait automatiquement. mais comment ?
ensuite je pense qu'il faut peut-être faire 4 colonnes pour le BL? je sais pas....

j'espère avoir été le plus précis possible merci pour votre aide

cordialement

 

[phlaurent55]

Bonjour czac,

voir fichier joint

à+
Philippe

 

[Jacky67]

Bonjour,

- SXB reste figé
- HKG sont des lettres que je mettrais manuellement
- 7701 c'est le chiffre qui doit s'incrémenter
- /17 c'est l'année

Bonjour,
Autre proposition en PJ

*Hello Philippe

 

[czac]

bonjour,

super, c'est exactement cela que je voulais

un grand merci

@+

 

[czac]

Bonjour Jacky67,

intéressant, par contre les 3 premières lettre doivent rester SXB. Ensuite, pour le numéro d'incrémentation, il doit commencer par un numéro que je défini en début d'année. Mais ca me plaît bien ce fichier

 

[Jacky67]

Bonjour Jacky67,

intéressant, par contre les 3 premières lettre doivent rester SXB. Ensuite, pour le numéro d'incrémentation, il doit commencer par un numéro que je défini en début d'année. Mais ca me plaît bien ce fichier

Re...
intéressant, par contre les 3 premières lettre doivent rester SXB
C'est le cas Non ??
Ensuite, pour le numéro d'incrémentation, il doit commencer par un numéro que je défini en début d'année.
Pour cela il suffit de modifier la première ligne manuellement

 

[Jacky67]

Bonjour Jacky67,

intéressant, par contre les 3 premières lettre doivent rester SXB. Ensuite, pour le numéro d'incrémentation, il doit commencer par un numéro que je défini en début d'année. Mais ca me plaît bien ce fichier

Re..
Erreur de ma part
SXG ,SXB
Je change de lunette
Cette version demande le départ de la numérotation (4 chiffres obligatoire) en cas de changement d'année

 

[czac]

oh, franchement génial

merci beaucoup

chris

 

[Jacky67]

oh, franchement génial

merci beaucoup

chris

Re..
NB: Pj un peu modifié en #7

 

[czac]

Pas de PJ

 

[Jacky67]

Pas de PJ

RE...
Si, Si , c'est celle présente dans #7 que j'ai modifié

 

[czac]

Super,

merci beaucoup

 

[job75]

Bonjour czac, Philippe, Jacky67,

Il vaut mieux mettre le tableau sous forme de tableau Excel, voyez le fichier joint et cette macro :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim n&, x$, i%, num, y$
With ListObjects(1).DataBodyRange.Columns(1)
  For n = .Rows.Count To 2 Step -1 'recherche la dernière cellule non vide
    If .Cells(n) <> "" Then
      x = .Cells(n - 1) 'cellule précédente
      If x Like "SXB*#*/##" Then
        For i = 1 To Len(x)
          If IsNumeric(Mid(x, i, 1)) Then num = Val(Mid(x, i)) + 1: Exit For
        Next i
        If Not .Cells(n) Like "SXB*" & num & "/" & Right(x, 2) Then
          y = Replace(Replace(.Cells(n), "SXB", ""), "/", "") 'épurage au cas où...
          For i = 0 To 9
            y = Replace(y, i, "")
          Next i
          Application.EnableEvents = False 'désactive les évènements
          .Cells(n) = "SXB" & UCase(y) & num & "/" & Right(x, 2)
          Application.EnableEvents = True 'réactive les évènements
        End If
      End If
      Exit For
    End If
  Next n
End With
End Sub

Seule la dernière cellule en 1ère colonne est étudiée.

A+

 

[czac]

Super,

ca fait 2 tableaux très bien étudier. Par contre, quand on sera en 2018 ou 2019 etc.... est-ce que le 17 passera en 18 (pour 2018) ou 19 (pour 2019) etc.....

en grand merci à vous tous

 

[czac]

Ah oui autre chose que j'ai oublié, fin décembre j'ai déjà des dossiers pour 2018. y a t-il une possibilité pour qu'en décembre je puisse mettre au bout 18 au lieu de 17?

merci