Contenu récent par Michou9

Si je mets le non du sous-dossier ou se trouve le dossier Cela liste tous les dossiers se trouvant à l'intérieur du sous-dossier Y compris donc le dossier recherché Malheureusement cela ne me sert à rien Car le but est justement de localiser le sous-dossier où il se trouve

Je ne peux envoyer de dossier sur le Forum Rien n'est prévu pour cela J'ai donc fait un exemple sous Excel que je joins ici (La solution en 2, ne fonctionne pas)

Bonjour sylvanu Merci pour ton aide C'est un peu cela Si je rentre en C3 le dossier contenant tous les sous dossiers et en D3 le nom du sous dossier que je souhaite rechercher Cela me liste tous les sous-dossiers premiers (Le dossier principale contient des sous-dossiers qui contiennent eux...

Bonjour à tous J'ai un fichier Excel (environ 500 lignes actuellement) Dans la colonne A sont contenus des noms de sous dossiers Je souhaiterais pouvoir faire une recherche de ces sous-dossiers Windows dans un dossier précis à partir de ces noms contenus dans les cellules de cette colonne Les...

Bonjour sylvanu Comme je l'ai dit hier soir, j'ai donc limiter l'extraction des valeurs "m" à 300 A présent je souhaite extraire les valeurs de plus de 300 dans d'autres colonnes J'ai donc utiliser la même fonction en remplaçant If (T2(UBound(T2))) > 300 Then Separem = "" par If (T2(UBound(T2)))...

Bonjour bsalv Merci pour ta solution Je ne l'ai pas encore testée Je vais bien sûr le faire et je reviendrai donner les résultats

C'est bien ce que je voulais faire J'ai donc incorporer cette nouvelle fonction Seulement cela provoquait la même erreur que précédemment J'ai donc rajouter : On Error Resume Next Comme j'ai utiliser (par négligence) le même symbole "m" pour 2 types de données et que je ne peux pas revenir en...

Je rencontre quand même un problème pas avec €, mais avec le "m" Pour celui-ci j'ai donc adapter ta fonction comme ceci Function Separem(C$, N%) Dim T, T2 T = Split(C, "m ") If N > UBound(T) Then Separem = "": Exit Function T2 = Split(T(N - 1), " ") Separem = CDbl(T2(UBound(T2))) End Function...

Bien vu, plus d'erreur du tout et plus besoin de sierreur

Bonjour halecs93 Merci pour ta solution aussi Je vais l'essayer

Il y a quand même une erreur dans le cas ou il y aurait pas de nombre avant le premier € Mais c'est pas grave avec sierreur c'est bon

Merci pour cette explication Je vois qu'il n'y a même pas de message d'erreur si il n'y a pas de 3ème occurrence ou plus Super, je n'ai plus besoin de gérer les erreurs

Bonjour sylvanu Merci beaucoup !! C'est bien plus simple que par formule et cela fonctionne parfaitement Je l'ai également appliqué pour les nombres suivis de la lettre m Je vais poursuivre les tests Mais cela semble aussi fonctionner parfaitement Je n'ai malheureusement pas compris ta fonction...

oui c'est vrai, j'aurai du le préciser, je suis Excel 2007

Bonjour à tous je souhaite extraire des nombres à l'intérieure de cellules Ces nombres sont tous suivi d'un symbole par exemple "€" Mon problème c'est qu'il y plusieurs symboles identiques Pour ressortir le premier, nombre c'est facile Pour le 2ème, j'y arrive aussi Mais pour les suivants, je...