Bonjour à tous,

J'ai une cellule comportant 5 tirets (a-b-c-d-e-f-g) dont je voudrais isoler la derniere partie (g) et l'insérer dans une cellule (H) de mon sheet Arbor.
j'tilise pour cela le code ci-dessous
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(Lig, 8) = ReturnNom(FileItem.Name, 5)
fait appel au code suivant.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Function ReturnNom(CellRef As Integer, ElementNumber As Integer)
Dim Result() As String
Result = Split(CellRef, "-")
ReturnNom = Result(ElementNumber - 1)
End Function
Mais rien ne se passe. la colonne H reste vide

Quelqu'un aurait-il la solution ?

Un grand merci d'avance

Habiler