Font Size

Profile

Menu Style

Cpanel

25Julho2017

MS Office Gurus

Onde os desenvolvedores Office se encontram

  • Criar conta
    *
    *
    *
    *
    *
    *

    Campos marcados com asterisco (*) são obrigatórios.

Mensagem
  • Kunena is not installed or the installed Kunena version is not supported. The plug-in has now been disabled. Please install/upgrade Kunena to version 1.7 for the Kunena Discuss Plug-in to function properly.

Excel Programming with VBA Starter

Caros amigos,

Recentemente lancei mais um livro, em inglês, sobre programação VBA entitulado: Excel Programming with VBA Starter

Neste livro, você aprenderá como:

  • Extender e melhorar suas planilhas Excel utilizando o poder das Macros e programação com VBA
  • Se familiarizar com a linguagem VBA para criar planilhas profissionais no Excel
  • Acompanhar exemplos de problemas comuns que você encontrará no seu dia a dia


  • Escrito por Robert Martim
  • Acessos: 3230
Excel 2010 Gráficos

Adicionando barra de erro com valor fixo

Uma barra de erro fixo simplesmente indica que ao valor do ponto atual deve-se adicionar um número fixo qualquer. Suponha que você é gerente do SAC (Serviço de Atendimento ao Cliente) de sua empresa e que no mês de outubro o número de pessoas atendidas foi inferior a meta estabelecida.

Leia mais...

  • Escrito por Robert Martim
  • Acessos: 4136

Embed Excel

Há alguns anos atrás, a Microsoft disponibilizava um addon para web sob o qual podíamos executar planilhas Excel em um web browser. Porém, tal função foi removida e ficamos meio que "vendo o navio passar".Talvez, para alguns, isso não tenha sido grande problema; afinal, poucos realmente usaram tal ferramenta e a maioria passou batida por ela.

Com o aumento da demanda por aplicativos nas nuvens, chega a nós o Excel Mashup. Mas o que é isso? Basicamente, se você possui um SkyDrive,

Leia mais...

  • Escrito por Robert Martim
  • Acessos: 3880
Usando ActiveX Data Objects

Como usar o Microsoft.ACE.OLEDB.12.0

Neste breve artigo falarei sobre o uso do Microsoft.ACE.OLEDB.12.0 para acessar dados de uma planilha Excel. Até a versão 2003 (Excel 97-2003), usávamos a versão Excel 8.0 para acessar os dados de uma planilha Excel utilizando o ActiveX Data Objetcs (ADO). A partir do Office 2007, a Microsoft adotou o ACE para acesso de dados ao invés do JET.

Para o exemplo, você precisará referenciar as seguintes bibliotecas:

  •  ADO
  •  Windows Script Host Model

 Para referenciar tais bibliotecas, acesso o VBE (Visual Basic Editor) e no menu Referências, busque na lista pelas bibliotecas listadas acima

Referenciando o ActiveX Data Objects

O Windows Script Host Model será utilizado para abrir os arquivos Excel para importação dos dados. Já o ADO será utilizado para abrir a conexão de dados bem como o recordset (conjunto de registros).

No Exemplo, queremos abrir tanto arquivos com extensão XLS (Excel 97-2003) e XLSX (Excel 2007 e 2010). Neste caso, o código ficará como:

Abaixo, exemplo do código:

Sub AccessandoExcelComoBaseDeDados()
    
'   requer refs aos objetos Windows Script Host Model e ADO
    
    Const sNomePasta        As String = "\ARQUIVOS_DADOS"
    
    Dim objFSO              As New FileSystemObject
    Dim objFolder           As Folder
    Dim objFile             As File
    
    Dim objConn             As New ADODB.Connection
    Dim objRs               As New ADODB.Recordset
    
    
    Set objFolder = objFSO.GetFolder(ThisWorkbook.Path & sNomePasta)
    
    For Each objFile In objFolder.Files
        Select Case UCase(Right(objFile.Name, 4))
            Case "XLSX"
                objConn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
                   "Data Source=" & objFile.Path & ";" & _
                   "Extended Properties=""Excel 12.0 Macro;HDR=Yes;"";"
                
                objRs.Open "SELECT * FROM [Sheet1$];", objConn, adOpenKeyset, adLockOptimistic
                
                For i = 1 To objRs.Fields.Count
                    ThisWorkbook.Sheets(2).Cells(1, i).Value = objRs.Fields(i - 1).Name
                Next i
                    ThisWorkbook.Sheets(2).Range("A2").CopyFromRecordset objRs
                objRs.Close
                objConn.Close
                   
            Case ".XLS"
                objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                "Data Source=" & objFile.Path & ";" & _
                "Extended Properties=""Excel 8.0;HDR=Yes"";"
            
                objRs.Open "SELECT * FROM [DADOS$]", objConn, adOpenKeyset, adLockOptimistic
                
                For i = 1 To objRs.Fields.Count
                    ThisWorkbook.Sheets(1).Cells(1, i).Value = objRs.Fields(i - 1).Name
                Next i
                    ThisWorkbook.Sheets(1).Range("A2").CopyFromRecordset objRs
                objRs.Close
                objConn.Close
        End Select
    
    Next objFile
    
On Error Resume Next
    objRs.Close
    objConn.Close
    
    Set objRs = Nothing
    Set objConn = Nothing
    
    Set objFile = Nothing
    Set objFolder = Nothing
    Set objFSO = Nothing
    
    
End Sub
  • Escrito por Robert Martim
  • Acessos: 5205

Exportar área de dados do Excel para o Access

Objetivo da Macro:

  •     Exportações de uma tabela de dados do Excel em um banco de dados, usando uma conexão ADO para passar strings SQL.

Exemplos de onde esta função brilha:

  •  Funciona bem para o arquivamento de dados do Excel para um banco de dados Access.
  •  Não insere linhas se todas as células na linha estiverem em branco (evita entrar registros completamente nulos no banco de dados).

    Leia mais...

    • Escrito por Ken Puls
    • Acessos: 6501

Matemática para Excel - Logaritmos

Logaritmos e potências são, provavelmente, as duas ferramentas matemáticas que você mais usará em matemática financeira. Embora logaritmos sejam mais frequentemente utilizados em cálculos avançados da matemática financeira, ainda assim temos várias situações onde eles serão úteis.

Mas o que é um logaritmo? Este número nada mais é do que a potência de uma base b qualquer dado o resultado da potenciação. Se você observa bx =N (onde b e N são números positivos e b é diferente de 1) o logaritmo é dado por x = logbN.

Leia mais...

  • Escrito por Robert Martim
  • Acessos: 3677