Ciao a tutti
sulla colonna A ho elencati i percorsi di vari file (es. C:\cartella1\cartella2\...\cartellaN\nomefile)
Per estrarre il nomefile utilizzo la funzione:
Public Function fTrovanome(ByVal strPath As String) As String
Dim intStart As Integer
Dim intEnd As Integer
intStart = InStrRev(strPath, "\") + 1
intEnd = InStrRev(strPath, ".")
fTrovanome = Mid(strPath, intStart, intEnd - intStart)
End Function
ed inserendo sulla cella della colonna B il codice: fTrovanome(A1), mi viene restituito il nomefile
Vorrei fare lo stesso, ma al contrario, ossia fTrovapercorso(A1), in modo che mi venga restituito C:\cartella1\cartella2\...\cartellaN\ , ma non riesco a modificare correttamente la funzione.
Potete darmi una mano?
Grazie