Início / dba / Perguntas / 3554
Accepted
blueman010112
Asked: 2011-06-30 00:42:35 +0800 CST

planilhas EXCEL de entrada em lote para o Access

  • 772

Eu tenho um monte de folha de dados do Excel (em um arquivo)

Eu quero inserir em lote para o Access

mas não consigo encontrar um código de exemplo para fazer isso

o nome da folha de dados no acesso é o mesmo que no excel

existe algum código de VBscript pode fazer isso?

talvez no access ou excel vba?

ou qualquer software simples?

ms-access excel

3 respostas

  1. Best Answer

    Eu usaria o SSIS para fazer isso. Tente estas etapas:

    • Eu começaria criando uma variável de objeto para armazenar os nomes de suas planilhas
    • Eu criaria uma tarefa VB para extrair os nomes de suas planilhas e colocar os resultados na variável de objeto
    • Em seguida, crie um loop foreach que usa a variável de objeto como a coleção
    • crie outra variável e jogue no nome da planilha atual
    • adicione uma tarefa de fluxo de dados dentro do loop que usa a planilha atual como sua fonte de dados
    • adicione sua tabela de acesso como seu destino.

    Aqui está o script VB que você pode usar para extrair os metadados do Excel. Você precisa inserir as variáveis ​​do seu loop foreach para que isso funcione.

       Public Overrides Sub CreateNewOutputRows()

    Dim excelFilePath As String = Me.Variables.ExcelFilePath.ToString()
    Dim strCn As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
            "Data Source=" + excelFilePath + ";Extended Properties=Excel 8.0"
    Dim dtTables As DataTable
    Dim tableName As String

    Dim cn As OleDbConnection = New OleDbConnection(strCn)
    cn.Open()
    dtTables = cn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)

    For Each row As DataRow In dtTables.Rows
        tableName = row("TABLE_NAME").ToString()

        OutputBuffer.AddRow()
        OutputBuffer.EXCELFILEPATH = excelFilePath
        OutputBuffer.TABLENAME = tableName

    Next

    cn.Close()
    OutputBuffer.SetEndOfRowset()
End Sub

    É um pouco complicado, mas muito capaz de fazer. Boa sorte.

    • 3

  2. A maneira mais simples que consigo pensar é provavelmente escrever algum código VBA na pasta de trabalho do Excel. Quanto esforço depende de fatores como quantas colunas você tem em cada planilha, em que formato os dados estão, quão semelhante cada planilha é e com que frequência você terá que fazer isso. Todos os dados de cada planilha vão para uma tabela ou várias tabelas no banco de dados do Access? Outra opção pode ser executar, escrever algum código para exportar cada dado para um arquivo CSV, combinar e depois importar para o Access.

    • 2

  3. Eu recomendaria fortemente seguir a rota CSV.

    Exportar de Excell para CSV é simplesmente uma questão de "Salvar como...". Importar para o Access também é uma questão bastante simples . (Se esse link morrer, há muitos outros como esse no Google.)

    • 1

relate perguntas