• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Icaro

[VB 2005] Importar dados Access para uma folha de Excel

3 mensagens neste tópico

Gostaria de importar dados do Access para o Excel via VB

Julgo que não seria preciso abrir uma nova conexão dado ela já existir para outro formulário

Pretendia utilizar o método

Range.CopyFromRecordset

que me parece o mais fácil, alguém pode ajudar?

Obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bom resovido, à pedrada mas resolvido fui buscar os dados a uma dataGridView que se encontra noutro formulário

Esta de certeza não é a melhor maneira de fazer isto mas funciona, se alguém souber de outra forma pff poste


frmce.Visible = False
        frmce.Show()
       MDIP.xl.ActiveWorkbook.Worksheets("Despeur").select()
        Dim campos As Integer = frmce.DataGridView1.RowCount
        Dim n As Integer
        For n = 0 To campos - 2

            MDIP.xl.Application.Range("a" & n + 2).Value = frmce.DataGridView1.Item(0, n).Value

        Next n

      frmce.Close()

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bom fazendo então as coisas como deve ser

       xl.Application.Worksheets("rceur").select()


        Dim cn As New OleDb.OleDbConnection
        Dim com As New OleDb.OleDbCommand
        Dim res As OleDb.OleDbDataReader
        Dim i As Integer = 1


        cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;password=; User ID=Admin;Data Source=" & MDIP.caminho & "\bd1.mdb"

        cn.Open()

        com.Connection = cn
        com.CommandType = CommandType.Text
        com.CommandText = "Select Classificação from CE"
        res = com.ExecuteReader()
        While res.Read()
            i = i + 1

            xl.Application.Range("b" & i).Value = res.GetValue(0)

        End While
        cn.Close()



0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora