Como definir a classificação automática em duas colunas ao abrir a pasta de trabalho?

Question

Eu tenho uma pasta de trabalho para relatórios semanais, no entanto, diariamente, também adicionamos novos registros.

Agora, quero saber como definir a classificação automática em duas colunas específicas sempre que eu abrir a pasta de trabalho.

A seguir estão as colunas que eu quero usar:

• Final do ano atual do trabalho do antigo para o novo (coluna D, os dados começam na linha 6).

• Status de trabalho de Z para A (coluna J, os dados começam na linha 6).

insira a descrição da imagem aqui

    

Answer 1

Para definir a Classificação automática em colunas de desejo enquanto abre a pasta de trabalho, você precisa desta macro (VBA).

Private Sub Worksheet_Open()

Columns("D:D").Select
    Selection.Sort Key1:=Range("D6"), Order1:=xlDescending, Header:=xlYes, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

    Columns("J:J").Select
    Selection.Sort Key2:=Range("J6"), Order1:=xlDescending, Header:=xlYes, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

End Sub

Como funciona:

1. Pressione Alt+F11 para abrir o editor VB.
2. No canto superior esquerdo, em Project Explorer windows find ThisWorkbook .
3. Double click então Copy & Paste deste código.
4. Save & Close da pasta de trabalho.

Nota:

Agora, toda vez que você abrir o Workbook, o Excel executará este código para Classificar dados nas Colunas especificadas.