USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Buscando dados do Excel
Chico VB
LAMBARI
MG - BRASIL
Postada em 19/07/2005 11:47 hs         
Olá pessoal, estou com um dúvida, tenho que buscar dados em um arquivo com extensão (xls), e não faço idéia como seria. Se alguém puder me ajudar, agradeço.
 
Obrigado.
     
Susana
ANGRA DOS REIS
RJ - BRASIL
ENUNCIADA !
Postada em 19/07/2005 15:11 hs            
Ola, Chico
 
Existem varias maneiras de manipular um arquivo XLS pelo VB. Uma delas poderia ser a seguinte:
 
Dim ApliExcel As New excel.Application     'crie uma instancia do excel
ApliExcel.Workbooks.Open FileName:=NomedoArqXLS      'abrir o XLS 
linha=1
Do While True
     if ApliExcel.Cells(linha, 1).Value = "" then exit do    'se a coluna 1 da linha lida for igual a branco sai do LOOP e não lê mais a planilha.
    variáveloucampo1 = .Cells(linha, 1).Value  'coluna A   
    variáveloucampo2 = .Cells(linha, 2).Value  'coluna B
     
    linha = linha + 1
Loop
SET ApliExcel = Nothing
 
Seria por ai ....
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página