Propriedade OfficeDataSourceObject.Table (Office)
Obtém um String que representa o nome da tabela dentro do arquivo de fonte de dados que contém os registros de mala direta. O valor retornado pode estar em branco se o nome da tabela for desconhecido ou não aplicável à fonte de dados atual. Somente leitura.
Sintaxe
expressão. Tabela
Expressão Uma variável que representa um objeto OfficeDataSourceObject .
Exemplo
Este exemplo define o nome da tabela se ele estiver em branco no momento
Sub OfficeTest()
Dim appOffice As OfficeDataSourceObject
Set appOffice = Application.OfficeDataSourceObject
appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _
"UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees"
If appOffice.Table = "" Then
appOffice.Table = "Employees"
End If
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.