Macros: Gerando um Relatório | Excelmax Soluções e Controles

quarta-feira, maio 04, 2011

Macros: Gerando um Relatório

Gerando um Relatório

As Macros no Excel podem agilizar em muito as atividades que desenvolvemos.

Como mencionei nas postagens anteriores (Macros no Excel, Macros no Excel: Uso de Variáveis e Macros com variáveis e condições) com a utilização de variáveis podemos nos deslocar facilmente em uma base de dados e extrair as informações desejadas da forma que melhor nos convier.
 

Nosso objetivo neste exemplo é extrair determinadas informações com extrema rapidez e listá-las em outro local. Para isto ser feito, estaremos, mais uma vez, utilizando variáveis para que as mesmas percorram a base de dados.

A figura abaixo apresenta nossa base de dados.
 
Base de dados

A macro que executa a extração das informações é apresentada na próxima figura: 
Macro Relatório
















Podemos notar na macro (figura acima) que a restrição para extrair as informações desejadas esta na 2ª coluna:
  • If Sheets("Base").Cells(lin, col) = "M" Then

Todas as pessoas cadastradas que forem do sexo masculino ("M"), serão listadas a partir da 8ª coluna (será criada uma lista ao lado da lista original).

Relatório Final

Se desejarmos listar as pessoas do sexo feminino, simplesmente alteramos a letra referente ao sexo: trocamos "M" por "F".

A partir deste exemplo, podemos fazer diversas alterações e extrair as informações que desejarmos. Por exemplo, se o nosso objetivo for listar pessoas pelo estado civil (listar apenas os 'Casados'), alteramos as linhas da macro que definem isto:
  • col = 4     'Refere-se a coluna 4 (Est. Civil)
  • If Sheets("Base").Cells(lin, col) = "Casado" Then

Se você já estiver utilizando as variáveis em suas macros deixe aqui seu comentário ou sugestões!

Consultor e Professor: Ivair Claudio Ferrari

9 comentários:

  1. Simplesmente o melhor blog do gênero.Excepcional o conteúdo.

    ResponderExcluir
  2. Simplesmente o melhor blog do gênero. Conteúdo excepcinal.

    ResponderExcluir
  3. Exelente!!

    Mas quando eu tiver mais de uma condição?

    ResponderExcluir
  4. alguem que criou o macrto pode postar um link para download, sou novato e estou apanhando, desde ja agradeço

    ResponderExcluir
  5. É só colocar mais condições If!!

    ResponderExcluir
  6. Caro André Suruka:
    Acesse a postagem Macros: Gerador de Relatórios / Pesquisa no endereço a seguir: http://excelmax.blogspot.com/2010/11/macros-gerador-de-relatorio-pesquisa.html
    Nesta postagem há um link para download de um exemplo.
    Senha para exibir as macros: riavi
    Att. Administrador do Blog (Ivair)

    ResponderExcluir
  7. E se eu quiser gerar um relatorio da coluna "Valor"?
    de dois valores diferentes exemplo 1600 e 1400 em um relatorio apenas tem como?

    ResponderExcluir
  8. pessoal muito profissional, gostei do filtro avançado.

    ResponderExcluir

Seja um participante desta comunidade !
Deixe aqui seu comentário e/ou sugestão.
Obrigado !

Ivair Claudio Ferrari