Página 1 de 1

Erro em Macro de Classificação da Tabela

Enviado: 07 Abr 2021 às 14:59
por SandroLima
Boa noite.

Alguém poderia me apontar qual o problema e correção que deve ser feita na Macro de Classificação da planilha anexa.

Uso a mesma macro em várias tabelas e nesse caso especificamente está apresentando problemas quando incluo o Passo = 3.

Poderiam verificar por gentileza?

Segue planilha anexa.

Re: Erro em Macro de Classificação da Tabela

Enviado: 07 Abr 2021 às 15:46
por babdallas
Mude esta linha
Código: Selecionar todos
            Set RngCol = Range(Cells(Ini_Lin, Col_Reg ), Cells(Ult_Lin, Col_Reg ))
Para
Código: Selecionar todos
            Set RngCol = Range(Cells(Ini_Lin, Col_Reg + 1), Cells(Ult_Lin, Col_Reg + 1))

Re: Erro em Macro de Classificação da Tabela

Enviado: 07 Abr 2021 às 17:36
por SandroLima
Boa tarde, babdallas.

Obrigado pela intenção de ajudar... entendo que com sua solução ele passa a referenciar a Coluna [Data] para classificar/ordenar a Tabela.
Seria o mesmo que substituir o Col_Reg + 1 por Col_data.
Porém usando dessa forma pode acontecer de em datas repetidas os registros ficarem fora da ordem desejada.

Mas gostaria mesmo é de entender pq ele não permitiu fazer a rotina usando a Coluna [Registro].

Sabem me dizer o motivo?

Re: Erro em Macro de Classificação da Tabela

Enviado: 07 Abr 2021 às 23:28
por babdallas
Não usei a coluna Data, mas sim a Registro. Por algum motivo, o seu range registro estava pegando a coluna A e não a coluna B. Por isso somei 1 para corrigir.

Re: Erro em Macro de Classificação da Tabela

Enviado: 08 Abr 2021 às 10:15
por SandroLima
Excelente, babdallas.

Era exatamente isso mesmo. Identifiquei aqui pq ele estava referenciando sempre a coluna anterior.

Muito obrigado.