Método Range.InsertDatabase (Word)
Recupera dados de uma fonte de dados (por exemplo, um documento do Microsoft Word separado, uma planilha do Microsoft Excel ou um banco de dados do Microsoft Access) e insere os dados como uma tabela no lugar do intervalo especificado.
Sintaxe
expressão. InsertDatabase (Format, Style, LinkToSource, Connection, SQLStatement, SQLStatement1, PasswordDocument, PasswordTemplate, WritePasswordDocument, WritePasswordTemplate, DataSource, From, To, IncludeFields)
expressão Obrigatório. Uma variável que representa um objeto Range.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Format | Opcional | Variantes | Um formato listado na caixa Formatos da caixa de diálogo AutoFormatação da tabela (menu Tabela). Pode ser qualquer uma das constantes WdTableFormat. Por padrão, uma borda é aplicada às células da tabela. |
| Style | Opcional | Variant | Os atributos da AutoFormatação especificada por Formato são aplicados à tabela. |
| LinkToSource | Opcional | Variant | True para estabelecer um vínculo entre a nova tabela e a fonte de dados. |
| Connection | Opcional | Variantes | Um intervalo dentro do qual executar a consulta especificada pelo SQLStatement. |
| SQLStatement | Opcional | String | Uma sequência de consulta opcional que recupera um subconjunto dos dados de uma fonte de dados principal a ser inserido no documento. |
| SQLStatement1 | Opcional | String | Se a cadeia de caracteres de consulta for maior que 255 caracteres, SQLStatement denota a primeira parte da cadeia de caracteres e SQLStatement1 denota a segunda parte. |
| PasswordDocument | Opcional | Variant | A senha (caso haja alguma) necessária para abrir a fonte de dados. (Consulte os Comentários abaixo.) |
| PasswordTemplate | Opcional | Variant | Se a fonte de dados for um documento do Word, esse argumento será a senha (caso haja uma) necessária para abrir o modelo anexado. (Consulte os Comentários abaixo.) |
| WritePasswordDocument | Opcional | Variant | A senha necessária para salvar alterações no documento. (Consulte os Comentários abaixo.) |
| WritePasswordTemplate | Opcional | Variant | A senha necessária para salvar alterações no modelo. (Consulte os Comentários abaixo.) |
| DataSource | Opcional | Variant | O caminho e o nome de arquivo da fonte de dados. |
| From | Opcional | Variant | O número do primeiro registro no intervalo de registros a ser inserido. |
| To | Opcional | Variant | O número do último registro no intervalo de registros a ser inserido. |
| IncludeFields | Opcional | Variant | True para incluir nomes de campo da fonte de dados na primeira linha da nova tabela. |
Segurança
Importante
Evite usar senhas codificadas em seus aplicativos. Se um aplicativo for necessário em um procedimento, solicite a senha do usuário, armazene-a em uma variável e então use a variável em seu código. Para obter as melhores práticas recomendadas sobre como fazer isso, consulte Notas de segurança para desenvolvedores de soluções do Office.
Comentários
To valor do argumento Style pode ser a soma de qualquer combinação dos seguintes valores :
| Valor | Descrição |
|---|---|
| 0 (zero) | Nenhuma |
| 1 | Bordas |
| 2 | Sombreamento |
| 4 | Fonte |
| 8 | Cor |
| 16 | Auto-ajustar |
| 32 | Linha de título |
| 64 | Última linha |
| 128 | Primeira coluna |
| 256 | Última coluna |
A maneira como você especifica o argumento Connection depende de como os dados são recuperados. Por exemplo:
Ao recuperar dados através de ODBC (Open Database Connectivity), você especifica uma sequência de caracteres de conexão.
Ao recuperar dados do Excel usando troca dinâmica de dados (DDE), você especifica um intervalo nomeado ou "Entire Spreadsheet".
Ao recuperar dados do Access, você especifica a palavra "Table" ou "Query" seguida pelo nome de uma tabela ou consulta.
Exemplo
Este exemplo insere uma planilha do Excel chamada "Data.xls" após a seleção. O valor Style (191) é uma combinação dos números 1, 2, 4, 8, 16, 32 e 128.
With Selection
.Collapse Direction:=wdCollapseEnd
.Range.InsertDatabase _
Format:=wdTableFormatSimple2, Style:=191, _
LinkToSource:=False, Connection:="Entire Spreadsheet", _
DataSource:="C:\MSOffice\Excel\Data.xls"
End With
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.