locked
Banco de dados ?? RRS feed

  • Pergunta

  • Olá Pessoal,

    Gostaria de saber se utilizando Excel + VBA eu consigo trabalhar com um banco de dados !!

    Eu não quero fazer VBA com Access !! Quero VBA com Excel e + um banco de dados !!

    Isso é possivel ??

     

    Obrigado......

    terça-feira, 19 de setembro de 2006 11:25

Respostas

  • Olá Thiago,

          É possivel sim, dependendo da versão do Excel que vc estiver usando vc pode se conectar via ADO ou via ODBC com qualquer banco de dados apenas usando as Bibliotecas, assim como no VB.

    qualquer dúvida é só perguntar

    Se esta foi a resposta para seu Post marque como respondido
    att
    Henrique Gurgacz
    terça-feira, 19 de setembro de 2006 13:22

Todas as Respostas

  • Olá Thiago,

          É possivel sim, dependendo da versão do Excel que vc estiver usando vc pode se conectar via ADO ou via ODBC com qualquer banco de dados apenas usando as Bibliotecas, assim como no VB.

    qualquer dúvida é só perguntar

    Se esta foi a resposta para seu Post marque como respondido
    att
    Henrique Gurgacz
    terça-feira, 19 de setembro de 2006 13:22
  • Opa !!

    Valeu, mas por acaso vc tem ou sabe onde tem um tutorial disso ??

     

    Obrigado.

    quarta-feira, 20 de setembro de 2006 01:57
  • Olá Tiago,

           Dê uma olhada nas seguintes páginas:

    http://forums.microsoft.com/MSDN-BR/ShowPost.aspx?PostID=682106&SiteID=21
    http://www.macoratti.net/vba_xls1.htm
    http://www.juliobattisti.com.br/cursos/adovba/default.asp

    Espero ter ajudado

    Att
    Henrique Gurgacz
    quarta-feira, 20 de setembro de 2006 12:37
  • Este link interessante é

    https://sites.google.com/site/pfntec/modelos-e-exemplos-de-codigo-vba/excel-como-banco-de-dados---vba


    Rafael Gomes dos Santos Consultor de Informática MCAS - Microsoft Certified Application Specialist rafael.gomes.santos@gmail.com https://sites.google.com/site/pfntec/
    quarta-feira, 15 de dezembro de 2010 18:06
  • A rotina abaixo é um modelo para você adaptar ao seu código. Essa rotina abre um banco de dados Access localizado em c:\temp\teste.accdb e faz um SELECT na tabela. Os resultados são mostrados na janela de Verificação imediata.

    Para que o código funcione, você deve adicionar uma referência à biblioteca Microsoft ADO Ext. 2.8 for DDL and Security:

    Private Sub ADO_ACCDB()
      
      Dim rs As ADODB.Recordset
      Dim cn As ADODB.Connection
      
      Dim strDB As String
      Dim strSQL As String
      
      Set cn = New ADODB.Connection
      Set rs = New ADODB.Recordset
      
      strDB = "c:\temp\teste.accdb"
      cn.ConnectionString = _
         "Provider=Microsoft.ACE.OLEDB.12.0;" & _
         "Data Source=" & strDB & ";"
      cn.Open
      
      strSQL = _
       "SELECT [tblContatos].NOME, [tblCores].Descrição " & _
       "FROM [tblContatos] " & _
       "INNER JOIN [tblCores] " & _
       "ON [tblContatos].CORES_ID = [tblCores].CORES_ID"
      
      Set rs = cn.Execute(strSQL)
      
      If rs.RecordCount > 0 Then
        Do While Not rs.EOF
          Debug.Print rs.Fields("NOME"), rs.Fields("Descrição")
          rs.MoveNext
        Loop
      End If
      
      rs.Close
      cn.Close
    
      Set rs = Nothing
      Set cn = Nothing
    
    End Sub
    

     

     


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    sábado, 18 de dezembro de 2010 01:27