none
Ler todos os arquivos .xls de uma pasta

    Question

  • Ola pessoal,

    Sou novo por aqui e novo também em programação VB.

    Gostaria de saber se é possível eu ler todos os arquivos .xls de uma pasta.

    Exemplo:

    Gostaria de ler todos os arquivos .xls de uma pasta e mostrar em uma grade de valores todos os campos nome(exemplo) que estará em uma célula x (exemplo).

    Obrigado


    Daniel

    Friday, March 02, 2012 2:45 PM

Answers

All replies

  • Dim dir As New System.IO.DirectoryInfo("C:\Arquivos")
    Dim arq As System.IO.FileInfo
    
    For Each arq In dir.GetFiles("*.xls*")
        Response.Write(arq.Name & "<br>")
    Next
    http://israelaece.com/post/Trabalhando-com-Arquivos.aspx

    Paulo César Viana
    .NET Developer
    MCC - Microsoft Community Contributor
    MCP - Microsoft Certified Professional
    MCTS - Microsoft Certified Technology Especialist
    --
    Marque as respostas e contribua para uma melhora no fórum.

    Friday, March 02, 2012 3:00 PM
  • Paulo, obrigado pela resposta, mas o código esta com erro na sintxe.
    tentei deixar ele assim:

    Dim dir As New System.IO.DirectoryInfo

    dir ("C:\Arquivos")

    Dim arq As System.IO.FileInfo For Each arq In dir.GetFiles("*.xls*") Response.Write(arq.Name & "<br>") Next

    Mas também não funcionou...


    Daniel

    Friday, March 02, 2012 3:24 PM
  • Tem certeza?

    Comigo funciona. Segue o exemplo.

    **Talvez você esteja usando outro tipo de projeto e não está sendo reconhecido o Response.Write.

    Partial Class _Default
        Inherits System.Web.UI.Page
    
        Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            Dim dir As New System.IO.DirectoryInfo("C:\Arquivos")
            Dim arq As System.IO.FileInfo
    
            For Each arq In dir.GetFiles("*.xls*")
                Response.Write(arq.Name & "<br>")
            Next
        End Sub
    End Class

    <%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
    
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head runat="server">
        <title>Untitled Page</title>
    </head>
    <body>
        <form id="form1" runat="server">
        <div>
        
        </div>
        </form>
    </body>
    </html>


    Paulo César Viana
    .NET Developer
    MCC - Microsoft Community Contributor
    MCP - Microsoft Certified Professional
    MCTS - Microsoft Certified Technology Especialist
    --
    Marque as respostas e contribua para uma melhora no fórum.


    Friday, March 02, 2012 3:30 PM
  • Paulo, me desculpe, mas eu que devo ser muito burro (com certeza).
    O código que você me passou continua não funcionando, ai me surgiu uma dúvida, porque esse código HTML no meio???
    Só para você saber, eu estou programando VBA dentro do Excel, será que é por isso que nao esta funcionando?

    Daniel

    Friday, March 02, 2012 3:37 PM
  • São coisas totalmente distintas. O que postei é uma página asp.net (web forms) que lista os arquivos.

    Paulo César Viana
    .NET Developer
    MCC - Microsoft Community Contributor
    MCP - Microsoft Certified Professional
    MCTS - Microsoft Certified Technology Especialist
    --
    Marque as respostas e contribua para uma melhora no fórum.

    Friday, March 02, 2012 4:55 PM
  • Ta entendi, mas se é assim você tem alguma ideia do porque não esta funcionando?

    Daniel

    Friday, March 02, 2012 7:16 PM
  • "VBA dentro do excel" não é comigo, no entanto fiz uma pesquisa e encontrei algumas coisas que podem te ajudar.

    Localizando e consultando arquivos com o FileSystemObject
    http://www.bufaloinfo.com.br/Artigos/artigo1102.asp


    Listar arquivos de um diretório via VBA

    http://dicasdeexcel.com.br/2009/11/03/listar-arquivos-de-um-diretorio-via-vba/

    VBA – Listar Arquivos de um diretório
    http://www.tomasvasquez.com.br/blog/microsoft-office/vba-listar-arquivos-de-um-diretorio

    http://forum.clubedohardware.com.br/vba-listar-arquivos/365581?s=21b08defbfe5d7c4bfcd20de9235b649&amp;


    Paulo César Viana
    .NET Developer
    MCC - Microsoft Community Contributor
    MCP - Microsoft Certified Professional
    MCTS - Microsoft Certified Technology Especialist
    --
    Marque as respostas e contribua para uma melhora no fórum.


    Friday, March 02, 2012 7:25 PM
  • Muito Obrigado Paulo.

    Essa sua ultima resposta foi de grande ajuda.

    Daniel

    Monday, March 05, 2012 4:29 PM