Bonjour je cherche à déterminer si le nom d'un fichier que j'ai rentré dans une cellule est présent dans un répertoire donné. Si c'est le cas je colorie ma cellule.
Pour cela j'utilise la macro suivante :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
For Each C In Selection
  If Dir(Chemin & C.Value) <> "" Then
      C.Interior.ColorIndex = 45
  End If
Next C
Le problème c'est que la fonction Dir ne semble pas être sensible à la casse.
Si ma cellule contient aaa.txt et que dans le dossier j'ai AAA.txt le fichier va être reconnu comme existant or je ne veux pas.

J'ai chercher s'il n'y avait pas moyen, je n'ai rien trouvé.

J'ai bien pensé à récuper la liste du dossier dans un tableau et ensuite faire la comparaison mais je voudrait savoir s'il existait une solution plus élégante.

Merci à vous