Como classificar colunas em VBA

macros VBA pode classificar automaticamente colunas em uma planilha.

VBA ou "Visual Basic for Applications" é a linguagem de programação para escrever macros (funções) na planilha do Excel. A macro VBA fornece o benefício de automatizar tarefas repetitivas em um procedimento contínuo que pode ser executado em um clique de um evento de mouse, de teclas ou folha de cálculo.

Escrevendo uma macro VBA

  • selecionar "Arquivo | Novo" no Excel para criar um novo livro.

  • Digite os valores "frutas," "Maçã," "maçã," "Banana," e "Laranja" nas células A1, A2, A3, A4 e A5.

  • Digite os valores "preço," "1,5," "1,4," "2," "1,5" nas células de B1, B2, B3, B4 e B5.

  • selecionar "Ferramentas | Macro gt; Macros ..."

  • Digite o nome do Macro "sortFruitPrices" na caixa de diálogo Macro e selecione "Crio."

  • Copie e cole o seguinte código sob o cabeçalho da função auto-gerada "Sub sortFruitPrices." Observe que "_" representa mesma linha de continuação, "Cabeçalho" está configurado para "xlYes" de modo que a linha de título não está incluído no tipo e "Caso de compatibilidade" está configurado para "Verdade," de modo que a Apple precede Apple).

    Cells.Sort _

    Key1: = Range ("A1"), Order1: = xlAscending, _

    Key2: = Range ("B1"), Order2: = xlAscending, _

    Cabeçalho: = xlYes, OrderCustom: = 1, MatchCase: = True, Orientação: = xlSortColumns

  • pressione "F5" para executar a macro.

  • selecionar "Arquivo | Salvar" e salvar a macro em "C: Book1.xls."

Instalando uma macro VBA

  • pressione "Alt + TAB" para alternar entre o editor VBA para a folha de cálculo Excel.

  • selecionar "Ferramentas | Personalizar ..." e clique no "comandos" guia na caixa de diálogo.



  • selecionar "macros" de "Categorias" Lista. Clique em "Item de menu personalizado" de "comandos" lista, arraste-o sobre a "Ferramentas" opção no menu principal para que o menu se abre automaticamente, em seguida, solte-o sob o último item.

  • direita; clique em "Ferramentas | Menu de Cliente do item" e altere a entrada de nome para "ordenar&FruitPrices," em seguida, pressione "Entrar."

  • direita; clique em "Ferramentas | sortFruitPrices" e selecione "Atribuir Macro ...". Seleccione sortFruitPrices da lista de macro e clique "ESTÁ BEM." Feche o diálogo Personalizar.

  • Salvar "C: Book1.xls".

  • Alterar o valor "maçã" para "abacaxi" em seguida, selecione "Ferramentas | sortFruitPrices."

Adicionando a classificação automática

  • Clique no "Sheet1" guia na parte inferior da planilha e selecione "Ver código."

  • Clique na lista de objetos acima do painel de código-fonte, onde ele exibe "(Geral)" e selecione "Folha de trabalho."

  • selecionar "Alterar" de "Eventos" lista ao lado do "objetos" Lista.

  • Copie e cole o seguinte código sob o cabeçalho da função auto-gerada "Private Sub Worksheet_Change:"

    Se Target.Column = 1, então

    sortFruitPrices chamada

    Fim se

  • pressione "Alt + TAB" para alternar entre o editor VBA para a folha de cálculo Excel.

  • Salvar "C: Book1.xls."

  • Alterar "maçã para "sobremesa de maçã" e pressione "Entrar." Observe que a planilha classifica-se automaticamente.

dicas & avisos

  • Para depurar qualquer erro, entre a linha "On Error Goto ErrHandler" abaixo "Private Sub Worksheet_Change" e as seguintes linhas logo acima "End Sub."
  • sub Exit
  • ErrHandler:
  • MsgBox "Erro: """ & Err.Number & """ " & Err.Description
De esta maneira? Compartilhar em redes sociais:

LiveInternet