Como extrair informações de planilha do Excel com o DAO

Traduções deste artigo Traduções deste artigo
ID do artigo: 190195 - Exibir os produtos aos quais esse artigo se aplica.
Expandir tudo | Recolher tudo

Neste artigo

Sumário

O driver ISAM do Excel dinamicamente não converte tipos de dados.

Mais Informações

Se houver uma coluna em sua planilha do Excel que contém texto e números, o ISAM não poderão interpretar qual tipo de dados deve ser corretamente. Certifique-se que todas as células em uma coluna estiverem formatadas para ser o mesmo tipo de dados. Por exemplo, você pode ter dados em quatro colunas em uma planilha do Excel a seguir:
   male   female children teens
   11     cc     78       ee
   22     xx     33       ff
   45     uu     56       oo
				

Se você tentar ler os dados por meio do driver ISAM contra a planilha inteira, você obterá os valores nulos para primeira linha. Se você desejar evitar isso, crie intervalos nomeados: um contendo apenas as informações de cabeçalho e outra que contém as informações de dados. Por exemplo:
   named range 'myRange1' :
   male     female    children     teens

   named range 'myRange2' :
   11   cc   78   ee
   22   xx   33   ff
   45   uu   56   oo
				

Agora você pode conectar ao Excel e solicitação de informações somente de determinado intervalo nomeado. No entanto, em um intervalo, uma determinada coluna pode conter apenas um tipo de dados.

Como criar um intervalo

Siga estas etapas para criar um intervalo:
  1. Realce os dados.
  2. Na barra de menu, clique em Inserir e, em seguida, clique em nome .
  3. Clique em Definir e clique em nome de intervalo .
Observação: Caixa refere-se para se referirá a seu intervalo realçado. Isso deve aumentar e reduza conforme dados são inseridos e excluídos.

Para recuperar seus dados, use o nome de intervalo que você acabou de criar para o nome de tabela na instrução select.

Etapas do Excel

  1. Criar o arquivo do Excel, test.XLS, com dados seguintes na Planilha1:
       excel File : test.xls with the following entries:
    
            male  female    children   teens
             11    cc       78           ee
             22    xx       33           ff
             45    uu       56           oo
    					
  2. Criar o intervalo nomeado, myRange1 e myRange2, na planilha que contém os dados apropriados.
          named range : myRange1
    
          male female children teens
    
          named range  : myRange2
    
          11     cc   78   ee
          22     xx   33   ff
          45     uu   56   oo
    
    					

Etapas do Visual Basic

  1. Criar um novo projeto EXE padrão chamado "DAO_EXCEL."
  2. No menu Project , clique em referências e marque a caixa de seleção Biblioteca do Microsoft DAO 3.5 .
  3. Coloque um CommandButton no formulário.
  4. Cole o código a seguir na janela de código de formulário:
          private Sub Command_click1
    
          im dbtmp As DAO.Database
          im tblObj As DAO.TableDef
          im rs As DAO.Recordset
    
          et dbtmp = OpenDatabase_
               ("<complete path>\test.xls", False, True, "Excel 8.0;")
    
          DoEvents
    
          Set rs = dbtmp.OpenRecordset("select * from `myRange2`")
          While Not rs.EOF
              For x = 0 To rs.Fields.Count - 1
                  Debug.Print rs.Fields(x).Value
              Next
              rs.MoveNext
          Wend
          End Sub
    
          Note the reverse apostrophe "`" while specifying the range
          name(myrange2).
    
    					
Os resultados seguintes são conforme o esperado:
  11
  cc
  78
  ee
  22
  xx
  33
  ff
  45
  uu
  56
  oo
				

Referências

Por favor consulte a documentação sobre como se conectar ao Excel por meio do DAO. Outra boa referência será o ADO futuro-> referência do Excel.

Propriedades

ID do artigo: 190195 - Última revisão: quarta-feira, 2 de março de 2005 - Revisão: 2.3
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 6.0 Learning Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • The DAO SDK
Palavras-chave: 
kbmt kbdatabase kbhowto kbiisam KB190195 KbMtpt
Tradução automática
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 traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 190195

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com