Como criar uma macro do Excel para classificar os diferentes grupos de linhas pela mesma coluna mas nao todos ao mesmo tempo?

Eu tenho uma planilha que contém cerca de 1000 linhas. Eu quero criar um botão de macro único para classificar os diferentes grupos de linhas dentro da planilha, cada coluna C. Cada grupo contém uma quantidade diferente de linhas. Não quero classificar todas as 1000 linhas juntos. Eu gostaria de ser capaz de trabalhar com um grupo de linhas, clique em um botão de macro para classificar esse grupo e, em seguida, trabalhar com outro grupo de linhas, clique no mesmo botão macro para classificar esse grupo, etc. Estou a trabalhar no Excel 2007.

Meu conhecimento de macros e VBA é muito limitado. Eu sei como criar uma macro simples (em geral), usando a guia desenvolvedor, "Gravar Macro" e "Parar gravação", mas não sei como programar uma macro utilizando o VBA. Eu acho que sei como editar uma macro existente em VBA, no entanto. Eu também sei como criar uma macro "botão" e atribuir a macro a ele.

Resposta

Tente essa macro atribuída ao seu botão de comando.

Copie a macro a seguir para a área de transferência (realçar a macro inteira, botão direito do mouse dentro da área em destaque e 'Cópia'):

Sub Selection_Sort()

Dim fSel, lSel, sortKey

fSel = "C" & Selection(1).Linha

lSel = "C" & Selection(Selection.Count).Linha

sortKey = fSel & ":" & lSel

No erro GoTo errhandler

ActiveWorkbook. Worksheets(ActiveSheet.Name). Sort.SortFields.Clear

ActiveWorkbook. Worksheets(ActiveSheet.Name). Sort.SortFields. Adicione Key:=Range(sortKey) _

SortOn: = xlSortOnValues, ordem: = xlAscending, DataOption: = xlSortNormal

Com ActiveWorkbook. Worksheets(ActiveSheet.Name).Tipo

.SetRange seleção

.Cabeçalho = xlGuess

.MatchCase = False

.Orientação = xlTopToBottom

.SortMethod = xlPinYin

.Aplicam-se

Acabar com

Range(Selection(1).Endereço).Selecione

Exit Sub

ErrHandler:

MsgBox "ocorreu um erro. O mais provável, a coluna C não foi incluída no "& _

"as colunas selecionadas para ser classificado", vbCritical, "Encerrar tipo"

End Sub

Pressione ALT + F11 (função F11 chave)

Nos menus na parte superior do VBE, selecione Inserir > módulo

Cole a macro no módulo recém-criado.

Feche o VBE (botão vermelho w/white 'x' - canto superior direito).

Atribua a macro para o botão de comando.

Selecione qualquer intervalo de células (colunas e linhas) que inclui a coluna C e clique com o botão de comando.

Esse intervalo de células selecionados será classificado na coluna C, ascendente.