Compartilhar via


Objeto SharedWorkspaceFiles (Office)

Uma coleção dos objetos SharedWorkspaceFile no espaço de trabalho compartilhado atual.

Observação

A partir do Microsoft Office 2010, este objeto ou membro foi preterido e não deve ser usado.

Exemplo

Use a propriedade Files do objeto SharedWorkspace para retornar uma coleção SharedWorkspaceFiles.

    Dim swsFiles As Office.SharedWorkspaceFiles 
    Set swsFiles = ActiveWorkbook.SharedWorkspace.Files 
    MsgBox "There are " & swsFiles.Count & _ 
        " file(s) 
        vbInformation + vbOKOnly, _ 
        "Collection Information" 
    Set swsFiles = Nothing 

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.