Résultats de la recherche

  1. A

    Microsoft 365 Recherche d'une ou de plusieurs valeurs et suppression d'une cellule à la ligne de ces dernières

    Bonjour à tous, Petit soucis sur le code suivant : Sub test() With ActiveSheet.Range("B4:D300") Set r = .Find("rebut") If Not r Is Nothing Then firstAddress = r.Address Do Range("E" & r.Rows).Value = "" Set r =...