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.