Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
A coleção AllViews contém um AccessObject para cada vista no objeto CurrentData ou CodeData .
Comentários
O objeto CurrentData ou CodeData apresenta uma coleção AllViews que contém objetos AccessObject que descrevem instâncias de todos os modos de exibição especificados por CurrentData ou CodeData. Por exemplo, você pode enumerar a coleção AllViews no Visual Basic para definir ou retornar os valores das propriedades dos objetos AccessObject individuais da coleção.
Veja um objeto AccessObject individual na coleção AllViews ao referenciar o objeto por nome ou ao referir-se ao respetivo índice na coleção. Para fazer referência a um objeto específico da coleção AllViews, é melhor referir-se ao modo de exibição pelo nome porque o índice da coleção de um modo de exibição poderá sofrer alterações.
A coleção AllViews é indexada a partir de zero. Se se referir a uma vista pelo respetivo índice, a primeira vista é AllViews(0), a segunda vista é AllViews(1) e assim sucessivamente.
Observação
Para listar todas as vistas abertas na base de dados, utilize a propriedade IsLoaded de cada objeto AccessObject na coleção AllViews . Em seguida, pode utilizar a propriedade Nome de cada objeto AccessObject individual para devolver o nome de uma vista.
Não é possível adicionar nem excluir um objeto AccessObject da coleção AllViews.
Exemplo
O exemplo a seguir imprime o nome de cada objeto AccessObject aberto na coleção AllViews.
Sub AllViews()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
' Search for open AccessObject objects in AllViews collection.
For Each obj In dbs.AllViews
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub
Propriedades
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.