Conectando-se ao DB2Abaixo esta uma pequena rotina VBA executada no MS Excel para consultar uma tabela usando o driver de ODBC. Precisa limpar um pouco, declarar minhas variaveis, etc, mas funciona.Eu sempre achei dificil deixar um exemplo completo disso na Web. Tenho certeza que existe algum exemplo completo disso por ai, mas quis deixar minha contribuicao breve. Essa versao e boa devido ao usuario precisar de uma conexao ODBC em sua maquina. Automaticamente limitando o acesso cliente a um login que deva funcionar.Sub transfer()Dim varState As StringSet CS = CreateObject(ADODB.Connection)Set RS = CreateObject(ADODB.Recordset)Retrieve values from Cells on the sheet to use as selections in the query belowvarState = ActiveSheet.Range(C2).ValuevarFrom_Date = ActiveSheet.Range(B3).ValuevarTo_Date = ActiveSheet.Range(B4).Value ISeries connection StringConnectString = Driver={ISeries Access ODBC Driver};System=10.1.4.1;Uid=xxxxx;Pwd=xxxxx;Library=PWRDTA41;QueryTimeout=0ConnectString = Driver={ISeries Access ODBC Driver};System=10.1.4.1;Library=PWRDTA41;QueryTimeout=0CS.Open (ConnectString)SqlString = SELECT hhicusn , C.FFDCNMB, C.FFDSTEB, hhiclsn, SUM(hhiqysa), SUM(hhiexsn), SUM(hhiexac) & _ FROM pwrdta41.hhiorddp & _ left outer join PWRDTA41.FFDCSTBP c & _ ON hhicusn = c.ffdcusn and & _ hhidivn = c.ffddivn and & _ c.ffdcmpn = hhicmpn and & _ c.ffddptn = hhidptn & _ WHERE hhidtei between & varFrom_Date & and & varTo_Date & _ and hhiclsn = 105 and c.ffdsteb = & varState & & _ GROUP BY hhicusn, c.ffdcnmb, c.ffdsteb, hhiclsn & _ ORDER BY hhicusnMessage box can be used for debugging the SQL statementMsgBox (SqlString)RS.Open SqlString, CSClear Previous contents of CellsCells.SelectActiveSheet.Range(A7:Z65535).ClearContentscopy the Recordset to excel sheet starting at A7ActiveSheet.Range(A7).CopyFromRecordset RSClose Connection and RecordSetRS.CloseCS.CloseReset cell back to A1ActiveSheet.Range(A1).SelectEnd SubEnvie seus comentarios e sugestoes e compartilhe este artigo!brazilsalesforceeffectiveness@gmail.com Principais Tendencias de Analises de Dados em 2017Ha muito interessante em materias que falam sobre a analise de dados e sua tendencia. O investimento em Business Intelligence e Analises foi extremamente elevada e continua a crescer a um ritmo rapido. E possivel que 2017 seja um dos anos mais emocionantes, onde o mercado de Analises moldarao uma serie de eventos relacionados aos negocios e alem disso. Convido-o a ler sobre aquelas, que acredito, serao as principais tendencias de investimento em 2017.O BI Incorporado se tornara MainstreamAnalises Colaborativas se tornarao um ChavaoAnalytics sera tratado como uma competencia essencialAnalytics nuvem continuara a amadurecerA Transicao entre o BI e a IA Vai AcelerarComo sempre, estas sao apenas previsoes, e o futuro sobre eles mostrara se sao mesmo realistas. Independentemente dos exatos resultados dessa especulacao para o mercado de Analises em 2017, este ano certamente sera um momento interessante para o cenario de negocios, e vamos precisar esperar para ver o impacto das Analises em moldar nossa industria.Serie Big DataMundo Multi-CanalPensando Fora da CaixaPersonalizacaoOtimizando o TrabalhoO fenomenoO que esperar de um EspecialistaTomando As melhores Decisoes de NegocioPDD - Casos de Smarter Analytics na pratica - Smarter Analytics CasesAnalise Tradicional - Decida-se pela rapidez e melhor resultadoImmersion ou PRISM - Compreendendo os Metadados no GMailAdministrando a Sobrecarga de Dados CorporativosBusiness de Big DataFaltam Profissionais QualificadosSoftwares, Analise PreditivaTop 50 Big Data & AnalyticsSolucoes de Big DataSolucoes de Big Data para Empresas de Pequeno PorteSolucoes de Big Data para Empresas de Pequeno Porte - InsightSquaredSolucoes de Big Data para Empresas de Pequeno Porte - ClearStory DataSolucoes de Big Data para