Trouver les symboles étoiles

[pingouinal]

Bonjour,

J'ai un fichier extrait de SAP dans lequel certains intitulés commencent pas des étoiles (par exemple "**** Other Costs"). Je voudrais pouvoir les reconnaître par macro. Mais bien évidemment, le test If Left(Range, 4) = "****" ne marche pas puisqu'Excel associe le symbole * au fameux caractère spécial. J'ai essayé de placer le caractère tilde avant, mais sans résultat (j'ai essayé "~****" et "~*~*~*~*").

Est-ce que quelqu'un saurait comment je peux identifier dans ma macro les cellules commençant par 4 étoiles?

D'avance merci pour votre aide.

 

[Victor21]

Re : Trouver les symboles étoiles

Bonjour, pingouinl.

Utilisez le code de ce caractère, ou mieux, joignez un extrait en exemple.

 

[Pierrot93]

Re : Trouver les symboles étoiles

Bonjour,

une autre approche avec l'opérateur "like" :

If Range("A1") Like "[*][*][*][*]*" Then MsgBox "ok"

bonne journée
@+

 

[pingouinal]

Re : Trouver les symboles étoiles

Bonjour Pierrot93 et Victor21,

Merci pour vos retours très rapides.
J'ai testé la solution Like et elle marche parfaitement bien.

Encore merci pour cette précieuse aide.