Sujet Précédent Sujet Suivant

Formule dans excel

Fermé
coccinnelle78 Messages postés 2 Date d'inscription samedi 20 février 2016 Statut Membre Dernière intervention 22 février 2016 - 20 févr. 2016 à 19:38
ccm81 Messages postés 10907 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 janvier 2025 - 22 févr. 2016 à 20:56
Bonjour,

Je me permets de vous solliciter de l'aide car je n'arrive pas à trouver de solution.
Dans une de mes colonnes excel, je souhaiterais que toutes les personnes ayant accès à ce tableau, saisissent de la même façon ex: STA-PES-2016 et qu'un numéro d'incrémentation se fasse automatiquement
Qu'elle formule dois-je appliquer?
Merci pour votre aide
Delphine

3 réponses

Réponse 1 / 3
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 716
20 févr. 2016 à 22:24
Bonjour,

Ce que tu demande ne correspond pas aux caractéristiques d'excel (ou d'un autre tableur d'ailleurs). En effet si tu mets une formule dans une cellule, la saisie d'une information dans la cellule va écraser la formule.
Tu ne peux obtenir cela que grâce à une macro.
0
coccinnelle78 Messages postés 2 Date d'inscription samedi 20 février 2016 Statut Membre Dernière intervention 22 février 2016
22 févr. 2016 à 11:26
Bonjour,

Merci pour ton explication.
0
Réponse 2 / 3
ccm81 Messages postés 10907 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 janvier 2025 2 430
22 févr. 2016 à 18:34
Bonjour

Comme te l'a dit gbinforme (salut à toi en passant), il n'y a qu'une macro pour faire ça
Un exemple de ce que ça pourrait donner
http://www.cjoint.com/c/FBwrHfDDLfW

Cdlmnt
0
Réponse 3 / 3
ccm81 Messages postés 10907 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 janvier 2025 2 430
Modifié par ccm81 le 22/02/2016 à 21:06
Une erreur à corriger
lignes à remplacer: 
  If s Is Nothing Then
    Target.Value = Target.Value & sep & Left(fin, Len(fin) - 1) & "1"
  Else
    n = Right(s, Len(fin)) + 1
    fins = String(Len(fin) - 1 - Round((Log(n) / Log(10))), "0") & n
    Target.Value = nom & sep & fins
  End If

Cdlmnt
0