inserer texte et valeur variable

[kiko1987]

bonjour le forum,
je me casse la tête depuis hier pour inserer un numéro de commande evolutif avec une partie texte invariable (dans la feuille FICHENC), de la forme suivante:

NC10- (forme invariable) et valeur max de (DE4: DE500) +1 (partie variable)
ce qui doit me donner de NC10-001 à NC10-999

pouvez-vous m'indiquer comment faire pour stocker des nombre dan,s excel de la forme 001 à 999

ma formule est la suivante:

Range("D3").Value = "NC10-" & Max(DE4: DE500) + 1

et la ça me m'est un débogage

merci d'avance pour votre aide

 

[pierrejean]

Re : inserer texte et valeur variable

bonjour kiko1987

A tester

Range("D3").Value = "NC10-" & Format(Application.WorksheetFunction.Max(Range("DE4:DE500")) + 1, "000")

 

[kiko1987]

Re : inserer texte et valeur variable

bonjour pierrejean et merci,
ça ne me met plus le debogage mais ça ne varie pas j'ai toujours NC10-001 après 3 execusion. on dirait qu'il ne prend pas en compte le +1

 

[pierrejean]

Re : inserer texte et valeur variable

Re

Et qu'y a-t-il en

[COLOR=red]DE4:DE500[/COLOR]

?

 

[kiko1987]

Re : inserer texte et valeur variable

Re,
pour que ce soit plus simple je vous joint le lien avec le fichier car je ne suis pas un expert en VBA.

DE4😀E500 est généré par Range("DE3").Formula = "=MAX(DE4😀E5000)+1"

toutes les actions sont dirigées par le bouton impression dans la feuille FICHENC, et les codes se trouvent dans thisWorkBook

Cijoint.fr - Service gratuit de dépôt de fichiers

merci pour votre aide

 

[kiko1987]

Re : inserer texte et valeur variable

Merci beaucoup Pierre Jean,
la solution était assez simple, il fallait ajouté le nom de la feuille dans la formule Range("LISTING!DE4😀E500")) + 1, "000"). car la colonne DE est dans une feuille différente de la cellule D3.

bonne continuation