Remplir une cellule si comprise entre deux autres

Bonsoir

Je recherche une formule qui remplisse une cellule si cette dernière est comprise entre deux autres cellules....

Ci joint le fichier

Merci et bonne soirée

Lingo

bonsoir

si tu es appelé a remplir une cel de cette colonne MANUELLEMENT ;c'est impossible a faire en formule car cette derniere est ecrasée par la saisie (ou alors il faut une colonne additionnelle)

cela impose du VBA qui n'est pas sujet aux ref circulaire

cordialement

bonjour

comme dit par Tulipe, il vaut mieux une simple colonne de plus qui affichera ce que tu veux (simple formule SI)

bonjour; Jmd

ou alors prendre le temps de remplir ;sinon eventuelllement en "semi automatique" que tu pourras ameliorer en rentrant dans Validation >>liste

donc ;si la cel est vide ;tu choisis ou saisis ........

cordialement

Bonjour,

Une proposition à étudier.

Cdlt.

Public Sub InsertRowInTable()
Dim lo As ListObject
Dim LR As ListRow
Dim n As Long
Dim sValue As String
    If ActiveCell.ListObject Is Nothing Then
        MsgBox "Vous devez sélectionner une cellule du tableau.", _
               vbInformation, "Insertion ligne"
        Exit Sub
    Else
        Set lo = ActiveCell.ListObject
        n = ActiveCell.Row - lo.HeaderRowRange.Row
        If n = 0 Then
            MsgBox "La cellule sélectionnée doit être dans la plage des valeurs du tableau.", _
                   vbInformation, "Insertion ligne"
            GoTo exit_Handler
        End If
        sValue = lo.ListRows(n).Range.Cells(1, 2)
        Set LR = lo.ListRows.Add(n)
        With LR.Range
            .Cells(1, 1).Value = WorksheetFunction.Max(lo.ListColumns(1).DataBodyRange) + 1
            .Cells(1, 2).Value = sValue
        End With
    End If
    Set LR = Nothing
exit_Handler:
    Set lo = Nothing
End Sub

Merci pour cette solution...je vais l'essayer au pire je rajouterai une colonne.

Cdt

NB