Problème incrémentation chiffre et lettre

vassili · 7 Septembre 2011

Bonjour le forum,

Voila j'ai un soucis d'incrémentation de chiffre et de lettre en fonction de plusieurs combobox lors de l'insertion de n ligne.

C'est surement pas compliqué mais la je sèche un peu...

Les explications sont dans le fichier:

Regarde la pièce jointe TestVassili_v2.xls

En vous remerciant beaucoup par avance,

Vassili

vassili · 8 Septembre 2011

Re : Problème incrémentation chiffre et lettre

Re,

En faite la fonction que tu as faite prend en compte le nombre de total de S en fonction des identifiants du matériel et incrémente par la suite.
Or ce qu'il faudrait c'est plutôt prendre en compte le dernier numéro du S inscrit dans le paquet de matériel et incrémenter par la suite.

Je te joint un fichier,

Regarde la pièce jointe TestVassili_v3.xls

Merci et a bientot

tototiti2008 · 8 Septembre 2011

Re : Problème incrémentation chiffre et lettre

Bonjour vassili,

Après 16 messages on commence à comprendre la problématique, chouette

encore un essai, je ne sais pas si j'en ferais beaucoup d'autres

Code:

        For lgLig = 1 To Dline
            If .Range("A" & lgLig).Value = UserForm1.ComboBox1.Text And _
                .Range("B" & lgLig).Value = UserForm1.ComboBox2.Text And _
                .Range("C" & lgLig).Value = UserForm1.ComboBox3.Text And _
                .Range("E" & lgLig).Value = UserForm1.ComboBox4.Text And _
                .Range("F" & lgLig).Value Like strlettre & "*" Then
                num = CLng(Replace(.Range("F" & lgLig).Value, strlettre, ""))
                If num > nummax Then nummax = num
            End If
        Next lgLig

vassili · 8 Septembre 2011

Re : Problème incrémentation chiffre et lettre

Re,

Merci c'est la bonne sa marche super, bonne journée à toi

Vassili

Problème incrémentation chiffre et lettre

vassili

XLDnaute Occasionnel

Pièces jointes

vassili

XLDnaute Occasionnel

Pièces jointes

tototiti2008

XLDnaute Barbatruc

vassili

XLDnaute Occasionnel

Discussions similaires