Effacer le contenu d'une cellule si elle débute par... VBA

Résolu
mmyriamm -  
 mmyriamm -
Bonjour,

J'essaie de supprimer des cellules qui contiennent du texte qui débute toujours pareil, mais qui se termine différemment :

Exemple de texte :
| VACANCES INC.  20-SEP-2017 11:20 |

Voici ce que j'ai commencé à faire :

For Each cel In Range("c1:c3000")
If cel Like "|" Then cel.ClearContents

Mais ça ne se supprime pas. Ça se supprime uniquement si j'inscrit le texte au complet.
(If cel Like "| VACANCES INC.  20-SEP-2017 11:20 |" Then cel.ClearContents)

Mais ce texte change.

Est-ce que ça se fait?

Merci

Myriam

1 réponse

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    Il faut le faire ainsi si tu veux effacer les cellules qui commencent par "|"
    If cel Like "|*" Then cel.ClearContents

    Si tu veux effacer les cellules qui contiennent "|", c'est
    If cel Like "*|*" Then cel.ClearContents
    4
    1. mmyriamm
       
      Ça marche! Merci beaucoup!!!
      0