Macro de repetição para percorrer colunas

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

Macro de repetição para percorrer colunas

Mensagempor MARCIANA » Qui Out 10, 2019 5:14 pm

Olá, pessoal! Estou precisando do conhecimento de vocês, por favor. Tenho várias planilhas gigantes com linhas contendo motivos e colunas contendo os anos. Então, construí as macros abaixo para percorrer a coluna, mas não sei fazer a macro funcionar na coluna seguinte e automatizada (loop). Tenho que:

1 - classificar as colunas da B até a coluna P, contendo cada coluna os valores >0,5.
Código: Selecionar todos
Sub maior()
'
' maior Macro
'

    Range("B2:B75").Select
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
        Formula1:="=0,5"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Font
        .Color = -16383844
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13551615
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub


2 - classificar as colunas da Q até a coluna BX, contendo cada coluna os 5 maiores valores.

Código: Selecionar todos
Sub maior5()
'
' maior5 Macro
'

'
    Range("Q2:Q75").Select
    Selection.FormatConditions.AddTop10
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1)
        .TopBottom = xlTop10Top
        .Rank = 5
        .Percent = False
    End With
    With Selection.FormatConditions(1).Font
        .Color = -16383844
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13551615
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub


Aguardo retorno e agradeço-lhes. Marciana
MARCIANA
Membro
Membro
 
Mensagens: 1
Registrado em: Qui Out 10, 2019 4:55 pm
Has thanked: 0 time
Have thanks: 0 time

{ SO_SELECT }

Re: Macro de repetição para percorrer colunas

Mensagempor Coutinho » Sex Out 11, 2019 9:08 am

MARCIANA, o ideal seria disponibilzar seu modelo com dados ficticios se for o caso, atravez de algum dos sites de compartilhamento, Sendspace, drive e outros, facilita muito para se conseguir uma resposta mais objetiva.
No momento não tenho como reproduzir o que pretende, então de uma olhada no linka abaixo, acredito que irá ajudar.

Como Classificar Várias Linhas Ou Colunas De Forma Independente De Uma Vez No Excel
https://www.extendoffice.com/pt/documen ... ly.html#a1

[]s
Mauro Coutinho
Mauro Coutinho
com novo usuário devido a manutenção do grupo
Coutinho
Ninja do Excel
Ninja do Excel
 
Mensagens: 116
Registrado em: Qua Jun 12, 2019 6:18 pm
Has thanked: 5 times
Have thanks: 61 times


Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google Adsense [Bot], LaerteB, MSN [Bot] e 9 visitantes