none
Importação de Informações do Excel para SQL Server 2014 RRS feed

  • Pergunta

  • Boa tarde,caros colegas.

    Estou desenvolvendo uma solução que insira as informações que estão no excel  para sql server. Porém verificando em fóruns  e o próprio suporte microsoft https://support.microsoft.com/pt-br/kb/306125,  não consegui ir adiante com o proposito. 

    Pois quando compilo esse codigo abaixo aparece a informação (ERRO DE COMPILAÇÃO - O tipo definido pelo usuário não foi definido)

    1. ' Create a connection object.
      Dim cnPubs As ADODB.Connection
      Set cnPubs = New ADODB.Connection
      
      ' Provide the connection string.
      Dim strConn As String
      
      'Use the SQL Server OLE DB Provider.
      strConn = "PROVIDER=SQLOLEDB;"
      
      'Connect to the Pubs database on the local server.
      strConn = strConn & "DATA SOURCE=(local);INITIAL CATALOG=pubs;"
      
      'Use an integrated login.
      strConn = strConn & " INTEGRATED SECURITY=sspi;"
      
      'Now open the connection.
      cnPubs.Open strConn		
    ' Create a recordset object.
    Dim rsPubs As ADODB.Recordset
    Set rsPubs = New ADODB.Recordset
    
    With rsPubs
    	' Assign the Connection object.
    	.ActiveConnection = cnPubs
    	' Extract the required records.
    	.Open "SELECT * FROM Authors"
    	' Copy the records into cell A1 on Sheet1.
    	Sheet1.Range("A1").CopyFromRecordset rsPubs
    	
    	' Tidy up
    	.Close
    End With
    
    cnPubs.Close
    Set rsPubs = Nothing
    Set cnPubs = Nothing

    Gostaria de saber se existe alguma outra forma de realizar este processo, onde todas as informações que forem adicionadas no Excel atualize no sql, por meio do vba. 

    Desde já agradeço.

    quarta-feira, 22 de junho de 2016 18:23

Respostas

  • Abra o VBE. Clique em Ferramentas, depois Referências. Em seguida, procure o item Microsoft ActiveX Data Objects 2.8. Marque ela e clique em OK. Em seguida, tente compilar o código novamente.

    http://www.ambienteoffice.com.br - http://www.clarian.com.br

    quarta-feira, 22 de junho de 2016 21:51
    Moderador