O membro requisitado da coleção não existe
O erro "o membro requisitado da coleção não existe" ocorre quando você tenta acessar um objeto que não existe. Por exemplo, a instrução a seguir poderá remeter um erro se o documento ativo não contiver pelo menos uma tabela.
Sub SelectTable()
ActiveDocument.Tables(1).Select
End Sub
Para evitar esse erro ao acessar um membro de uma coleção, certifique-se de que o membro existe antes de acessá-lo. Se você estiver acessando o membro por número de índice, poderá usar a propriedade Count da coleção para determinar se o membro existe. O exemplo a seguir seleciona a primeira tabela caso haja pelo menos uma tabela no documento ativo.
Sub SelectFirstTable()
If ActiveDocument.Tables.Count > 0 Then
ActiveDocument.Tables(1).Select
Else
MsgBox "Document doesn't contain a table"
End If
End Sub
Se você estiver acessando um membro da coleção por nome, poderá efetuar um loop sobre os elementos de uma coleção usando um loop For Each...Next para determinar se o membro nomeado é parte da coleção. Por exemplo, o a seguir exclui a entrada AutoCorreção chamada "achieve" se ela fizer parte da coleção AutoCorrectEntries . Para obter mais informações, consulte Loop através de uma coleção
Sub DeleteAutoTextEntry()
Dim aceEntry As AutoCorrectEntry
For Each aceEntry In AutoCorrect.Entries
If aceEntry.Name = "acheive" Then aceEntry.Delete
Next aceEntry
End Sub
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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulteEnviar e exibir comentários de