Numérotation ligne excel

[Achraf]

Bonjour,

Je souhaite numéroter certaines lignes d'un tableau.
Je m'explique, la première colonne du tableau peut avoir 2 valeurs possibles : i ou n.
A chaque fois qu'une celulle de cette colonne prend la valeur i, je souhaite que dans la 2e colonne qu'elle soit numérotée 1 (ou 1000 ou le numéro de la ligne, peu importe, il faut juste que ce soit un numéro unique). A chaque itération de la valeur "i" dans la première colonne, il faut un numéro unique, pas forcément croissant, le numéro de ligne me paraît être la meilleure solution.

Jusque là tout va bien, seulement, si je supprime une ligne, ou si la valeur passse de i à n, il ne faut pas que la numérotation change.


Voici un exemple


Merci pour votre aide.

 

[francedemo]

Re : Numérotation ligne excel

bonjour,
avec une petite macro ?

Dim i As Integer
Dim j As Integer

j = 1
For i = 2 To [A65000].End(xlUp).Row
    With Cells(i, 1)
        If .Value = "I" Then .Offset(0, 2).Value = j: j = j + 1
    End With
Next i

à +

 

[Dranreb]

Re : Numérotation ligne excel

Bonjour.
Supprimez vos formules et mettez ça dans le module de la feuille:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Numéro As Long
If Target.Column = 1 And Target.Count = 1 Then
   If UCase(Target.Value) = "I" And Target.Offset(, 1).Value = "" Then
      Randomize
      Do: Numéro = Int(Rnd * 10000): Loop Until WorksheetFunction.CountIf(Columns(1), Numéro) = 0
      Target.Offset(, 1).Value = Numéro
      End If
   End If
End Sub

À +

 

[Achraf]

Re : Numérotation ligne excel

Merci pour vos réponses.

@Dranreb : j'ai copié le code vba dans le module de la feuille, je me trompe peut-être, mais je n'ai pas l'impression qu'il fonctionne.

en pièce jointe, le fichier excel avec votre code VBA

 

[Dranreb]

Re : Numérotation ligne excel

C'est à dire qu'il fonctionne uniquement quand on modifie une cellule de la colonne A au profit de "I". Mais il ne révise pas les "I" existants qui ne portent pas de numéros.
Cordialement.

 

[Achraf]

Re : Numérotation ligne excel

Excusez moi d'insister, le fait est que quand je copie le code VBA dans le module de la feuille, et que je clique sur play pour exécuter le code. Excel me demande de nommer une nouvelle macro suite à cela j'obtiens la fenêtre ci-jointe.
Qu'est ce que je dois faire au juste?

Merci de m'éclairer et encore désolé

 

[Dranreb]

Re : Numérotation ligne excel

Inutile de mettre une copie de la macro dans un module ordinaire.
Dans "Feuil1 (Feuil1)" seulement ça suffit.
Il n'y a pas à en demander l'exécution: La macro se déclenche toute seule quand on modifie une cellule de la colonne A. C'est ce qu'on appelle une procédure évènement, certains disent évènementielle.
Mais elle n'a d'effet que si on y met "I" et que la B ne contient pas déjà mieux qu'une chaîne vide.

 

[Achraf]

Re : Numérotation ligne excel

Merci beaucoup