Fonction pour extraire le reste de la chaîne après la dernière barre oblique inverse

J'ai besoin d'une fonction Excel qui permet d'extraire une chaîne de caractères après le dernier \ à partir d'un chemin d'accès et si aucun \ trouvé ensuite prendre l'ensemble de la chaîne. Par exemple:

D:\testing\rbc.xls                     output will be   rbc.xls
D:\home\testing\test1\script1.sql      output will be   script.sql
script 3.txt                           output will be   script 3.txt
  • bienvenue sur stackoverflow. veuillez noter que ce n'est pas une partie de la rédaction des normes de service. merci de partager ce que vous avez essayé jusqu'à présent et où vous êtes coincé.
  • Avez-vous regardé la fonction InStrRev qui trouve la dernière occurrence d'une sous-chaîne dans une chaîne principale. Pos = InStrRev(PathFileName,"\") donne le dernier "\". FileName = Mis$(PathFileName,Pos+1) extrait les caractères après la barre oblique.
  • Je vous suggère de lire en bas de la listes alphabétiques des fonctions VBA et les méthodes. Dans mes débuts, j'ai fait cela tous les mois ou jusqu'à ce que, lorsque je suis arrivé à un problème nouveau, je savais qu'il y avait une fonction qui fait ce que j'ai besoin, même si je n'ai pas souvenir de la syntaxe.
  • Je vais voter pour fermer cette question hors-sujet parce que ce site n'existe pas de dupliquer la documentation fournie avec les langages de programmation.
  • Double Possible de Extraire les fichier dans le chemin d'accès
InformationsquelleAutor user664481 | 2015-12-12
  1. 14

    1.Changer tous les "\" à la des espaces, le nombre de places est déterminé par le nombre de caractères dans la cellule

    2.Utilisez le bouton droit de la fonction pour extraire le droit de la chaîne de caractères en fonction du nombre de caractères dans la cellule.

    3.Utiliser la fonction trim pour supprimer les espaces.

    Fonction pour extraire le reste de la chaîne après la dernière barre oblique inverse

    Seront vos résultats.

    Fonction pour extraire le reste de la chaîne après la dernière barre oblique inverse

    =TRIM(RIGHT(SUBSTITUTE(A1,"\",REPT(" ",LEN(A1))),LEN(A1)))

    Comme l'a suggéré, une façon de faire cela sans formules ou de vba serait d'utiliser "Rechercher/Remplacer".
    Appuyez sur Ctrl & "H" de clés et de faire ce qui suit.

    Trouver ce *\ et les remplacer par rien

    Fonction pour extraire le reste de la chaîne après la dernière barre oblique inverse

    Le code VBA pour qui serait

    Sub ReplaceIt()
    Columns("A").Replace What:="*\", Replacement:="", SearchOrder:=xlByColumns, MatchCase:=True
End Sub
    • Génial !! Merci....
    • Deux autres techniques ajouté
    InformationsquelleAutor Davesexcel