Como utilizar o componente Web de folha de cálculo com o Visual Basic

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática… erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 235883
Exclusão de Responsabilidade para Conteúdo sem Suporte na KB
Este artigo foi escrito sobre produtos para os quais a Microsoft já não fornece suporte. Por conseguinte, este artigo é oferecido "tal como está" e deixará de ser actualizado.
Sumário
Se pretender utilizar um motor de folha de cálculo ou cálculo na sua solução do Visual Basic personalizada, pode utilizar o controlo de folha de cálculo incluído com o Microsoft Office Web Components. Este artigo explica como inserir uma folha de cálculo como um controlo num formulário do Visual Basic e preencher a folha de cálculo com dados.
Mais Informação
Pode adicionar os componentes Web do Office a um formulário no Visual Basic da mesma forma que adiciona qualquer outro controlo ActiveX. O controlo de folha de cálculo incluído com os componentes Web do Office é uma opção mais robusta do que o controlo DataGrid que é fornecido com o Visual Basic. Utilize os dados de folha de cálculo para apresentar dados formatados, calcular fórmulas e permitir interactividade do utilizador.

importante : para visualizar e trabalhar com qualquer um dos componentes Web do Office, tem de ter os instalado no computador. Os componentes são instalados com o Microsoft Office 2000 ou, se a empresa tiver uma licença de site do Office 2000, os componentes podem ser transferidos a partir da sua intranet. Os utilizadores tem de ter estes componentes instalados bem e tem de ser abrangidos por uma licença do Office 2000. Os utilizadores e devem utilizar o Microsoft Internet Explorer versão 4.01 ou posterior.

Passos para criar um projecto de exemplo

  1. Crie um novo projecto EXE padrão no Visual Basic. É criado o Form1 por predefinição.
  2. Adicione uma referência para Microsoft Office Web Components 9.0.
  3. Adicione o controlo de folha de cálculo da caixa de ferramentas do Visual Basic ao formulário.
  4. O controlo de folha de cálculo pode ser apresentado e utilizado como uma folha de cálculo ou pode ser oculto e utilizado como um motor de cálculo para controlos visíveis na página.
Trabalhar com a folha de cálculo do controlo no Visual Basic é quase idêntico para trabalhar com uma folha de cálculo no Excel. Os métodos e propriedades que utilizar para manipular o componente de folha de cálculo são semelhantes aos que utilizaria quando automatizar o Excel.

Preencher um controlo de folha de cálculo

Pode adicionar dados a um controlo de folha de cálculo das seguintes formas:
  • Introduza dados directamente na grelha.
  • Copiar e colar dados de folha, ficheiro de texto ou documento do Excel.
  • Importar dados de um ficheiro de texto ou uma página Web. Para mais informações consulte o tópico LoadText método e o tópico de propriedades HTMLURL na ajuda online.
  • Escreva código para preencher a folha de cálculo com dados.
Tenha em atenção que não existe nenhuma forma de ligar o controlo de folha de cálculo directamente aos dados.

O seguinte procedimento preenche e formata um controlo de folha de cálculo com dados provenientes de dados de exemplo Adamastor (NWind.mdb):
Sub GetNwindData()    Dim rstEmployees As Object    Dim cnn As String    Dim strSQL As String    Dim fldCount As Integer    Dim intIRow As Integer    Dim intICol As Integer    Dim varData As Variant    'Create recordset and fill with records from Northwind sample database.    Set rstEmployees = CreateObject("ADODB.Recordset")    cnn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Program Files\Microsoft Visual Studio\VB98\nwind.mdb"    strSQL = "SELECT FirstName, LastName, Title, Extension FROM Employees ORDER BY LastName"    rstEmployees.Open strSQL, cnn, 3 ' adOpenStatic = 3        'Clear any existing values from the spreadsheet control.    Spreadsheet1.ActiveSheet.Cells(1, 1).Select    Spreadsheet1.ActiveSheet.UsedRange.Clear    'Add the field names as column headers.    For fldCount = 0 To rstEmployees.Fields.Count - 1        intIRow = intIRow + 1        Spreadsheet1.ActiveSheet.Cells(1, intIRow).Value = rstEmployees.Fields(fldCount).Name    Next    'Fill the control with data from the database.    Dim iNumCols As Integer    Dim iNumRows As Integer        iNumCols = rstEmployees.Fields.Count    iNumRows = rstEmployees.Recordcount    varData = rstEmployees.GetRows(iNumRows)        For intIRow = 1 To iNumRows        For intICol = 1 To iNumCols            Spreadsheet1.ActiveSheet.Cells(intIRow + 1, intICol).Value = varData(intICol - 1, intIRow - 1)        Next    Next    'Format the headers in row 1 with a Bold Font that is 11 points.    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),Spreadsheet1.ActiveSheet.Cells(1, iNumCols)).Font        .Bold = True        .Size = 11    End With        'AutoFit the columns and make all text left-aligned.    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),Spreadsheet1.ActiveSheet.Cells(iNumRows + 1, iNumCols))        .AutoFitColumns        .HAlignment = ssHAlignLeft    End WithEnd Sub				


Note que um controlo de folha de cálculo não é um livro e contém apenas uma única folha. A propriedade ActiveSheet refere-se sempre a essa única folha.

Obter ajuda

Depois de criar uma referência à biblioteca componentes Web do Office, pode aceder ajuda através do localizador de objectos ou do separador Geral da caixa de ferramentas de propriedades da folha de cálculo. Também pode localizar e clicar duas vezes no ficheiro de ajuda Msowcvba.chm. Para obter ajuda sobre uma palavra-chave específica, realce a palavra-chave e prima a tecla F1 . Para obter informações sobre como criar referências e utilizar o objecto de modelo de ajuda, consulte a ajuda no Visual Basic ou Visual Basic for Applications.

Pode ligar um controlo de gráfico a um controlo de folha de cálculo. Para obter informações adicionais sobre o controlo de gráfico, clique no número de artigo existente abaixo para visualizar o artigo na base de dados de conhecimento da Microsoft:
235885Como utilizar o componente Web de gráficos com VB
Referências
Para obter mais informações sobre componentes Web do Office, consulte o capítulo 12, "Utilizar Web tecnologias," no ' Manual ' do Microsoft Office 2000/Visual Basic Programmer.

Aviso: Este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 235883 - Última Revisão: 07/14/2004 18:59:24 - Revisão: 1.2

Microsoft Office Spreadsheet Component 9.0

  • kbmt kbhowto kbofficewebspread KB235883 KbMtpt
Comentários