Incrémenter une chaine de caractère

L

Lolote83

XLDnaute Barbatruc

• 20 Octobre 2016

• #2

Salut Fleet21,
Il te faut donc récupérer le dernier caractère de ta variable NS.
En imaginant que la variable NS soit en cellule D9

Code:

Sub Test()
    NS = [D9]
    xDerCar = Val(Right(NS, 1))
    xDébutNS = "MM1234R8000"
    xIncrement = xDerCar + 1
    NS = NS & xDébutNS & xIncrement
    [D9] = NS
End Sub

Voili voilà, si j'ai bien compris
@+ Lolote83

 

Dernière édition: 20 Octobre 2016

Vote positif 0 Vote négatif

F

fleet21

XLDnaute Junior

• 20 Octobre 2016

• #3

Tu as effectivement bien compris ma demande 🙂 .
Par contre en incrémentant ns prend la valeur MM1234R80001MM1234R80002 alors qu'il faudrait seulement MM1234R80002.

 

Vote positif 0 Vote négatif

F

fleet21

XLDnaute Junior

• 20 Octobre 2016

• #4

Je viens de trouver la solution : remplacer ns = ns & xDébutNS & xIncrement par ns = xDébutNS & xIncrement

 

Vote positif 0 Vote négatif

F

fleet21

XLDnaute Junior

• 20 Octobre 2016

• #5

le sujet est clos merci à lolote83 comment fais t'on pour clore un sujet ?

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 20 Octobre 2016

• #6

Re salut,
Pour clore, je crois qu'il faut que tu tre connectes et et tu reprennes l'intitulé de la demande et inscrire RESOLU, ce qui donnerait : (RESOLU) Incrémenter une chaine de caractère
Sinon, je ne vois pas
@+ Lolote83

 

Vote positif 0 Vote négatif

F

fleet21

XLDnaute Junior

• 20 Octobre 2016

• #7

je viens de regarder plusieurs posts et pas de RESOLU, je laisse comme ça pour l'instant on viendra surement me contacter si il manque quelquechose 🙂 .

 

Vote positif 0 Vote négatif