XL 2019 Calcul automatique des nombres des lignes

bauerjackob · 9 Juin 2022

Bonjour
Je voudrais savoir comment effectuer un calcul automatique dans un autre feuille les nombres des lignes Sans modifier le fichier.
j ai mis un exemple pour quelques lignes. Et dans la feuille A est la base et dans la feuille B le résultat

sylvanu · 11 Juin 2022

Oui, mais elle n'a pas à le saisir. Elle n'a rien à faire.
Le "_" est mis en automatique. Donc quel que soit ce que saisie l'opératrice "1234" sera toujours traduit en "_1234", comme les vides remplacés par "-". Avec ces lignes en début de macro :

VB:

    For Each c In Sheets("A").[A1].CurrentRegion
        If c.Value = "" Then c.Value = "-"
        If IsNumeric(Left(c.Value, 1)) Then c.Value = "_" & c.Value
    Next c

bauerjackob · 11 Juin 2022

sylvanu à dit:
Euh! C'est le votre, la PJ #25.

Aucune solution c'est le meme . peut etre ma versio d excel produit cette erreur.

sylvanu · 11 Juin 2022

Ca m'étonnerait. ( bien qu'étant sous XL2007, je n'ai jamais rencontré ce souci )
Essayez cette PJ.
Si je trouve quelque chose qui commence par un chiffre alors je le fais précéder de "_"
Dans ce cas on ne traite que des chaines de caractères. Chez moi ça marche, évidemment :

sylvanu · 11 Juin 2022

C'est à n'y rien comprendre.
Bref, si ça marche, c'est le principal. 🙂

bauerjackob · 11 Juin 2022

sylvanu à dit:
Ca m'étonnerait. ( bien qu'étant sous XL2007, je n'ai jamais rencontré ce souci )
Essayez cette PJ.
Si je trouve quelque chose qui commence par un chiffre alors je le fais précéder de "_"
Dans ce cas on ne traite que des chaines de caractères. Chez moi ça marche, évidemment :
Regarde la pièce jointe 1142128

J ai cette solution que tu propose mais ce que je demande ce qu avec une base de donne de milliers de ligne et une operatrice de saisie qui entre les donnes via une formulaire .... pff . Comment faire resoudre ca au lieu de mettre une lettre devant.

sylvanu · 11 Juin 2022

Oui, mais elle n'a pas à le saisir. Elle n'a rien à faire.
Le "_" est mis en automatique. Donc quel que soit ce que saisie l'opératrice "1234" sera toujours traduit en "_1234", comme les vides remplacés par "-". Avec ces lignes en début de macro :

VB:

    For Each c In Sheets("A").[A1].CurrentRegion
        If c.Value = "" Then c.Value = "-"
        If IsNumeric(Left(c.Value, 1)) Then c.Value = "_" & c.Value
    Next c

XL 2019 Calcul automatique des nombres des lignes

bauerjackob

XLDnaute Junior

Pièces jointes

sylvanu

bauerjackob

XLDnaute Junior

sylvanu

XLDnaute Barbatruc

Pièces jointes

sylvanu

XLDnaute Barbatruc

bauerjackob

XLDnaute Junior

sylvanu

XLDnaute Barbatruc

Discussions similaires

XL 2019 Calcul automatique des nombres des lignes

bauerjackob

XLDnaute Junior

Pièces jointes

bauerjackob

XLDnaute Junior

sylvanu

XLDnaute Barbatruc

Pièces jointes

sylvanu

XLDnaute Barbatruc

bauerjackob

XLDnaute Junior

sylvanu

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency