Propriedade ShareName
Retorna o nome do compartilhamento de rede para uma unidade especificada.
Sintaxe
objeto. Nome_do_compartilhamento
O objeto é sempre um objeto Drive .
Comentários
Se o objeto não for uma unidade de rede, a propriedade ShareName retornará uma cadeia de caracteres de comprimento zero ("").
O código a seguir ilustra o uso da propriedade ShareName .
Sub ShowDriveInfo(drvpath)
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
s = "Drive " & d.DriveLetter & ": - " & d.ShareName
MsgBox s
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.