Excel, comment retirer des nombre d'un liste

Résolu
max251 -  
Bonjour,

mon titre n'est pas très explicite, voici ma question :
Je fais dans excel une liste de numéro de 1 à 99
sous la forme : A1 : 1 A2 : 2... A99 : 99
Je voudrais que quand j'entre dans une cellule (par exemple B4) un numero (ex: 33) la liste deviennent 1,2,..,32,34,35...98,99

connaissez vous une solution ?
merci pour votre aide !

3 réponses

  1. michel_m Contributeur
    Bonjour, 

    Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$4" Then Exit Sub
    If Application.CountIf(Columns(1), Range("B4")) > 0 Then
        Range(Columns(1).Find(Range("B4"), Range("A65536"), xlValues).Address).Delete Shift:=xlUp
    Else
        MsgBox Range("B4").Value & " inconnu dans colonne A!", vbCritical
    End If
End Sub


    comment installer ?
    copier cette macro
    clic droit sur le nom de l'onglet de la feuille concernée (en bas de l'écran)
    visualiser le code
    coller
    si tu n'as jamais utilisé de macros, cocher menu options-macros-sécurité- niveau moyen
    1
    1. max251
      merci michel je vais essayer ça !
      0
      1. Raymond PENTIER Contributeur
        Bonjour Max.

        Pour créer ta liste, tu tapes 1 en A1 ; dans la cellule B1 tu écris la formule
        =SI(A1=99;"-";SI(A1+1=$B$4;A1+2;A1+1)) que tu recopies jusqu'en CU1.
        0