Compartilhar via


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.