Macro pour ouvrir un repertoire

Bonjour à tous,
Voilà, je viens déjà de passer pas mal de temps pour trouver réponse à ma question, sans résultat
plus précisément:
j'ai une liste de chemin réseau contenant l'arborescence complète et le nom de fichier
chaque chemin dans une cellule
je souhaiterai pouvoir ouvrir le répertoire réseau (comme si le nom de fichier n'était pas inscrit)
toutes mes opérations se soldent soit par une erreur soit par le lancement du programme utilisé par le fichier pour être exécuté

j'ai essayé
sNomFichier = "c:\windows\explorer.exe " + ActiveCell
Shell sNomFichier, vbMaximizedFocus

ou
sNomFichier = ActiveCell
ThisWorkbook.FollowHyperlink sNomFichier

je pense qu'une fonction simple peut être utilisée pour le faire mais je n'ai pas trouvé
un exemple de cellule :
\\DS213P-SYNOIR-2\Music\Karaoke\kar et midi\R\Regg'lyss\Il Suffirait De Presque Rien.mid

avec
\\DS213P-SYNOIR-2\Music\Karaoke\kar et midi\R\Regg'lyss\
tout marche et si je sais gérer une recherche de caractère pour, par exemple enlever le nom de fichier dans une fonction, je ne sais pas le faire par macro...

j’espère avoir été clair
merci d'avance
Cordialement