Je voudrais à l'aide de VBA rechercher une chaîne de caractères dans une cellule, sachant que la cellule ne contient pas que la chaîne de caractères recherchée.
J'utilise la fonction find de la façon suivante :
Code:
With Worksheets("Extract BAAN").Range(Cells(1, 1), Cells(derniere_ligne_extract, 5))
Set cel = .Find(entite, LookIn:=xlValues)
End With
Sachant que la variable entite contient une chaîne du type "LOG CMN" et que la cellule qu'il doit trouver est de ce type (tous ces caractères de cette façon dans la cellule, avec des espaces au milieu):
Date : 18/09/08 [18:01] LOG CMN Reporting Département LOG CMN Page : 6
La fonction Find n'a pas l'air de trouver étant donné que cel est vide.
Re : VBA : Rechercher une chaine de caractères dans une autre
Apres m'etre a nouveau rendue compte que ca deconnait, (decidement je suis pas douee), j'ai fini par trouver un moyen de gerer l'exception du type LOG et LOG CMN (car bien entendu ce n'est pas le seul couple d'entites a faire exception...) en utilisant tes macros Pierrejean.
Re : VBA : Rechercher une chaine de caractères dans une autre
Bonjour,
Tout d'abord merci pour ce sujet qui m'a aider à mieux comprendre find.
J'ai un problème similaire. Avec une erreur #valeur
J'aimerai rapporter le nombre de stylos bleus au nombre de jours ouvrés dans le calcul de la formule "evolution".
Cela revient à diviser les arguments du module indice_evolution par les jours ouvrés correspondants qui sont situés dans une 2ème feuille
Pour cela il faut:
-récupérer la période situé en ligne1 et même colonne que la cellule argument de la formule "evolution"
-rechercher cette période dans la feuille "découpage calendaire"
-renvoyer dans la fonction les jours ouvrés associés à la période
J'espère être suffisamment clair, n'hésitez pas à me dire ce que vous ne comprenez pas.
Merci pour votre aide
Salutations
Seb