Comment incrémenter un chiffre dans une formule

[sofysofe]

Bonjour, je voudrais faire un code en avec un chiffre qui s'incrémenterait avec une condition.
Je ne suis pas claire, j'en ai conscience, alors je joins un fichier qui le sera plus que moi ...

D'avance merci !!!

 

[Jocelyn]

Re : Comment incrémenter un chiffre dans une formule

Bonjour le Forum,
Bonjour sofysofe,

A mettre en A4 et à étirer vers le bas

=SI(C4="";"";"code"&SOMMEPROD((ESTNUM(CHERCHE("code";$A$3:A3)))*1)+1)

Cordialement

 

[Victor21]

Re : Comment incrémenter un chiffre dans une formule

Bonjour, sofysofe, Jocelyn 😉

Une autre proposition en pj avec un format personnalisé :

En A4 à recopier vers le bas

=(C4<>"")*NB.SI(C$4:C4;"oui")

Format :

"code "Standard;;

 

[DoubleZero]

Re : Comment incrémenter un chiffre dans une formule

Bonjour, sofysofe, Jocelyn 😀, Victor21 😀, le Forum,

Une autre suggestion, avec ce code à placer dans un module standard :

Option Explicit
Sub Numéro_incrémenter()
    Dim compteur As Integer
    Dim c As Range
    Application.ScreenUpdating = False
    compteur = 1
    For Each c In Columns(3).SpecialCells(xlCellTypeConstants, 23)
        If c = "oui" Then
            c.Offset(, -2) = "code " & compteur
            compteur = compteur + 1
        End If
    Next
    Application.ScreenUpdating = True
End Sub

A bientôt 🙂

 

[sofysofe]

Re : Comment incrémenter un chiffre dans une formule

Bonjour le Forum,
Bonjour sofysofe,

A mettre en A4 et à étirer vers le bas

=SI(C4="";"";"code"&SOMMEPROD((ESTNUM(CHERCHE("code";$A$3:A3)))*1)+1)

Cordialement

Merci Jocelyn,

Un enorme merci !

Le truc, c'est que j'utilise Excel en anglais, ce qui ne me pose pas de problème, mais là, j'ai traduit, et ça me renvoi une erreur #Nom! ... du coup, puis-je te demander de me renvoyer le fichier excel avec la formule, je pourrais voir ou je me suis plantée dans ma traduction.

Sofe

 

[sofysofe]

Re : Comment incrémenter un chiffre dans une formule

Merci Patrick !

Ca me semble être bon, malgré tout, je ne comprends pas comment tu fais pour avoir le mot "code" ...? Et vu que j'ai créé un fichier exemple qui ne correspond pas à la réalité, je n'arrive pas à adapter ta formule ... Tu peux m'expliquer s'il te plait ?

Sofe

 

[Jocelyn]

Re : Comment incrémenter un chiffre dans une formule

Re
Bonjour L'ami victor21🙂, et l'amie 00🙂

je te passe le fichier

Par contre je pense que soit la solution a Doublezero par macro ou celle de Victor21 sont bien aussi,

Moi personnellement ne connaissant rien en VBA j'obterais pour la solution à Victor21

dans la solution à victor si le fait que code ne soit pas réellement inscrit dans la cellule te gène une toute petite transformation donnera le résultat avec code dans la cellule

="code"&(C4<>"")*NB.SI(C$4:C4;"oui")

Bise 00
Chaleureuse poignée de main Victor21

Cordialement

 

[sofysofe]

Re : Comment incrémenter un chiffre dans une formule

Merci Jocelyn, mais y'a pas le fichier ...

 

[DoubleZero]

Re : Comment incrémenter un chiffre dans une formule

Re-bonjour,

Le fichier avec la macro.

Bises, Jocelyn 😀.

A bientôt 🙂

 

[Victor21]

Re : Comment incrémenter un chiffre dans une formule

Re, bonjour, OO🙂

je ne comprends pas comment tu fais pour avoir le mot "code" ...? Tu peux m'expliquer s'il te plait ?

Sofe

Bien sûr, c'est ce que j'ai fait brièvement plus haut , dans les cellules concernées de la colonne A : Format, cellule, personnalisé, et saisir ce format :

"code "Standard;; [ /QUOTE]
"Code " avec un espace affichera le mot code au début, "Standard" affichera 1,2,3... et les 2 virgules qui suivent permettent de ne rien afficher si la formule citée plus haut renvoie 0.
🙂

 

[Si...]

Re : Comment incrémenter un chiffre dans une formule

salut

une autre macro évènementielle (dans le cas d'une trop grande prise de poids avec les formules, formatages et MFC) ?