Formule "Si une cellule contient la lettre M alors la remplacer.

Marie7831 Messages postés 12 Date d'inscription   Statut Membre Dernière intervention   -  
Gyrus Messages postés 3360 Statut Membre -
Bonjour à tous,

Je recherche désespéremment une formule me permettant de dire : "Si une cellule contient la lettre M alors la remplacer par la cellule juste en dessous".

Par exemple, en B3 : M
B4 : 124578

Actuellement je coupe B4 et le colle à la place de B3 afin d'avoir en B3 : 124578.

Pouvez-vous m'aider par une formule ou une macro ? :)

Merciii :)

1 réponse

  1. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Avec une macro
    Sub Test()
    Dim Cel As Range
    For Each Cel In ActiveSheet.UsedRange
    If Cel.Value = "M" Then
    Cel.Offset(1).Cut Cel
    End If
    Next Cel
    End Sub

    A+
    0