Discussion :

[traderpierre]

Bonjour,

J'ai une table qui catalogue l'arborescence de tous mes fichiers d'un dossier spécifique.
Exemple : (Cette arborescence peut comporter plus ou moins d'antislash \)
Z:\Formations\Arduino\Tuto Live Arduino épisode 3 Entrées numériques et boutons.mp4 ;
Comment trouver la position du dernier antislash "\" de manière à ensuite extraire la chaîne de caractères correspondant au fichier ???

Existe-t-il une fonction semblable à DansChaîne(1;[ChampAnalysé];"\") ou InStr(1;[ChampAnalysé];"\") mais qui opérerait sa recherche de droite à gauche au lieu de l'inverse.

Merci par avance pour votre aide

[Phiphi41]

Bonjour

La solution la plus simple est de créer une variable de type tableau, de la remplir en utilisant la fonction SPLIT avec le \ comme caractère de séparation.

Et ensuite de récupérer la données dans la plus grande valeur du tableau.

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 Dim strTab() As String
    Dim strChaine As String
 
    strChaine = "Z:\Formations\Arduino\Tuto Live Arduino épisode 3 Entrées numériques et boutons.mp4"
 
    strTab = Split(strChaine, "\")
    MsgBox strTab(UBound(strTab))

[micniv]

Bonjour,

InStrRev, fonction
Renvoie la position d'une occurrence d'une chaîne dans une autre, à partir de la fin de la chaîne.
Syntaxe
InstrRev(stringcheck, stringmatch[, start[, compare]])


Cdlt

[Phiphi41]

Bonjour,

InStrRev, fonction
Renvoie la position d'une occurrence d'une chaîne dans une autre, à partir de la fin de la chaîne.
Syntaxe
InstrRev(stringcheck, stringmatch[, start[, compare]])


Cdlt

Comme il fallait extraire la dernière composante du chemin, j'ai pensé que le split dans un tableau était plus simple.