Orbital

Você já imaginou transformar uma pilha de dados brutos em planilhas organizadas e gráficos impressionantes em questão de segundos?

Com a evolução da Inteligência Artificial (IA), isso não é apenas possível, mas está ao alcance de todos.

Nesta edição especial, vamos mergulhar no fascinante mundo da automação de dados com IA, mostrando como você pode utilizar o ChatGPT para gerar planilhas e gráficos no Excel de forma rápida e eficiente.

Macros no Excel: Uma Introdução

Antes de mergulharmos na mágica da IA, vamos entender o que são macros no Excel. Macros são, basicamente, sequências de comandos ou instruções que automatizam tarefas repetitivas no Excel. Elas são escritas em uma linguagem de programação chamada VBA (Visual Basic for Applications) e podem variar de simples comandos para formatar dados a scripts complexos para análises avançadas.

ChatGPT: como Assistente de Programação Inteligente

Agora, imagine ter um assistente que não só entende VBA, mas também pode escrever esses scripts para você, baseado em suas instruções. É aqui que o ChatGPT entra em cena.

ChatGPT é um modelo de linguagem de IA avançado que pode gerar códigos de macro para o Excel com base no seu briefing.

Seja você um especialista em Excel ou alguém que mal conhece macros, o ChatGPT pode simplificar enormemente esse processo.

  1. Abra um chat com o ChatGPT e forneça o seguinte briefing: Preciso de uma macro em VBA para o Excel que crie uma planilha de vendas com cerca de 100 entradas. As colunas devem incluir data, produto, quantidade, preço, total de vendas, e estoque. Adicionalmente, inclua uma aba separada com um gráfico mostrando as vendas por mêsIMPORTANTE: Se você for executar a macro em um Excel para MacOS, você precisa inserir isso no briefing para que o ChatGPT utilize componentes e objetos suportados pelo sistema operacional
  2. O ChatGPT irá gerar um script de macro VBA. Este script criará automaticamente a planilha desejada com dados hipotéticos e um gráfico correspondente. A macro ficará mais ou menos assim:
Sub CriarPlanilhaDeVendasEGráfico()
    Dim ws As Worksheet
    Dim chartSheet As Worksheet
    Dim i As Integer
    Dim lastRow As Integer

    ' Criar uma nova planilha para os dados
    Set ws = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
    ws.Name = "Dados de Vendas"

    ' Adicionar cabeçalhos
    ws.Cells(1, 1).Value = "Data"
    ws.Cells(1, 2).Value = "Produto"
    ws.Cells(1, 3).Value = "Quantidade"
    ws.Cells(1, 4).Value = "Preço"
    ws.Cells(1, 5).Value = "Total de Vendas"
    ws.Cells(1, 6).Value = "Estoque"

    ' Adicionar dados fictícios
    For i = 2 To 101
        ws.Cells(i, 1).Value = DateSerial(Year(Date), Int((12 - 1 + 1) * Rnd() + 1), Int((28 - 1 + 1) * Rnd() + 1))
        ws.Cells(i, 2).Value = "Produto " & Int((10 - 1 + 1) * Rnd() + 1)
        ws.Cells(i, 3).Value = Int((5 - 1 + 1) * Rnd() + 1)
        ws.Cells(i, 4).Value = Round((100 - 10 + 1) * Rnd() + 10, 2)
        ws.Cells(i, 5).Formula = "=C" & i & "*D" & i
        ws.Cells(i, 6).Value = Int((50 - 10 + 1) * Rnd() + 10)
    Next i

    ' Criar uma nova aba para o gráfico
    Set chartSheet = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
    chartSheet.Name = "Gráfico de Vendas"

    ' Definir o range para o gráfico
    lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
    ws.Range("A1:A" & lastRow).Copy
    chartSheet.Range("A1").PasteSpecial Paste:=xlPasteValues
    chartSheet.Range("A1:A" & lastRow).RemoveDuplicates Columns:=1, Header:=xlYes

    ' Somar vendas mensais
    chartSheet.Range("B1").Value = "Vendas Totais"
    For Each cell In chartSheet.Range("A2:A" & chartSheet.Cells(chartSheet.Rows.Count, 1).End(xlUp).Row)
        cell.Offset(0, 1).Formula = "=SUMIF('" & ws.Name & "'!A:A, A" & cell.Row & ", '" & ws.Name & "'!E:E)"
    Next cell

    ' Adicionar gráfico
    chartSheet.Shapes.AddChart2(240, xlColumnClustered).Select
    ActiveChart.SetSourceData Source:=chartSheet.Range("A1:B" & chartSheet.Cells(chartSheet.Rows.Count, 1).End(xlUp).Row)
    ActiveChart.Parent.Name = "Gráfico de Vendas"
End Sub
  1. Abra o Excel e crie uma nova planilha.
  2. Pressione ALT + F11 para abrir o Editor do VBA.
  3. No menu, escolha Inserir > Módulo para abrir uma nova janela de módulo.
  4. Cole o script de macro fornecido pelo ChatGPT na janela do módulo.
  5. Salve o módulo e feche o Editor do VBA.
Macro fornecida pelo ChatGPT inserida na função ‘Macro’
  1. Volte para o Excel e pressione ALT + F8 para abrir a caixa de diálogo “Executar Macro”.
  2. Selecione a macro ‘GerarRelatorioDeVendas’ e clique em ‘Executar’.
  3. A macro irá preencher a planilha com os dados hipotéticos e gerar um gráfico de vendas por mês na aba especificada.
  4. Verifique a planilha e o gráfico gerados para assegurar que a macro funcionou conforme esperado.
Planilha gerada automaticamente pela macro com conjunto de dados para teste e um gráfico

Conclusão

Esperamos que este passeio pelo processo de criação e implementação de macros tenha iluminado novas possibilidades para você.

Agora, não apenas as planilhas, mas também os gráficos complexos podem ser gerados com uma facilidade surpreendente, tudo graças ao poder combinado da IA e do Excel.

Ao adotar estas inovações, você não está apenas dando um upgrade em suas habilidades analíticas, mas também se alinhando com as tendências de um futuro onde a tecnologia simplifica e enriquece nossas tarefas cotidianas.

Então, aqui vai a provocação do dia: você já imaginou quais outras tarefas do seu dia a dia poderiam ser transformadas com um toque de automação inteligente?

Compartilhe com a gente suas ideias e insights! Vamos juntos descobrir novos horizontes onde a tecnologia pode nos levar!


Posts Relacionados

Se gostou desse post
leia esses também...