Comment faire pour obtenir les noms partagés en VBA pour Excel

Le nom de partage d'un lecteur permet aux utilisateurs de réseau avec le nom à partir de laquelle ils peuvent accéder à des fichiers, des imprimantes et des ressources réseau. Le nom commun est pas toujours le même nom que le nom de lecteur local. Vous pouvez utiliser le langage VBA et le "Object File System» inclus avec le langage VBA pour déterminer le nom du lecteur partagé dans vos applications.

Instructions

1 Ouvrez le fichier qui contient votre code VBA. Si vous avez créé le code via l'interface Microsoft Office VBA, ouvrez le fichier Office et cliquez sur le bouton "VBA" dans l'onglet ou de ruban "Developer".

2 Créer une variable d'objet FSO. Le code suivant crée l'objet FSO et des points sur le lecteur que vous voulez lire:

Set file = New FileSystemObject
Set drive = FSO.GetDrive ( "c: \")

Remplacer "c: \" avec la lettre de lecteur sur l'ordinateur local.

3 Obtenez le nom de partage pour le lecteur. Le code suivant récupère le nom partagé et affiche le nom de l'utilisateur:

sharedname = drive.ShareName
MsgBox "Le nom partagé est« & sharedname