Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
Por ej05
#49451
Tenho uma planilha operacional que minha Macro faz o filtro de pela coluna C e filtra todos os dados com a ocorrência (04-Transito). Até aqui perfeito.

STATUS
04-TRANSITO

Agora na Coluna X, com datas e gostaria da ajuda de vocês para informar como consigo através de uma Macro para primeiro efetuar a seleção acima e depois filtrar a data atual.

ETA
24/10/2019 09:10


Seria;
01 – Macro seleciona os processos que estão com Status 04-TRANSITO
02 – Ativa o segundo filtro na Coluna X
03 – Procura na Coluna X a data atual ou a data mais próxima e filtra o resultado.
Avatar do usuário
Por Jimmy
Avatar
#49453
Olá ej05,

Anexe a planilha ou uma versão de teste.

Jimmy San Juan
Editado pela última vez por Jimmy em 26 Out 2019 às 09:36, em um total de 1 vez.
Por ej05
#49552
Hi Jimmy,
Muito obrigado pela ajuda.
Veja anexo a Planilha como Modelo. Sendo uma Planilha operacional, muitos dados foram alterados por XX pois não abrir estas informações.

Agora a logica é a seguinte.;
Há um Botão chamado ( TRANSITO ), que quando ativado ele filtra pela Coluna C, STATUS, os processo que estão em TRANSITO. Até ai.. perfeito..
Agora gostaria que este mesmo botão filtrasse os processos em Transito Coluna C e também filtrasse na Coluna X, linha 8 os processo com a data mais atual.
Exemplo hoje dia 24-10, assim, a macro verificaria a data mais próxima.

Meu email é eder06@gmail.com
Anexo o Modelo do aquivo onde destaquei com Duas setas vermelhas.
Você não está autorizado a ver ou baixar esse anexo.
Avatar do usuário
Por Jimmy
Avatar
#49562
Olá ej05,

A planilha veio sem as macros, logo, não dá para o botão TRANSITO passar a fazer o que faz e mais o que quer do novo.

Podemos fazer a macro apenas para fazer o novo, e você incorpora à sua, ou manda o arquivo com macros.

Quando ao segundo filtro, não entendi bem. A coluna tem datas e horas. Você quer que filtre apenas as linhas que tem data igual à de hoje, ou a hora também importa? Se a hora importar, quer as horas próximas à hora atual até quanto? Duas horas a mais ou a meno, por exemplo? Um dos filtros de data é o "Está entre X e Y". Podemos usar este?

Jimmy San Juan
Editado pela última vez por Jimmy em 26 Out 2019 às 09:35, em um total de 1 vez.
Por ej05
#49585
Jimmy,
Agradeço pela ajuda e pronto retorno.
Em resposta suas perguntas, o segundo filtro pode buscar somente a data mais atual, não havendo necessidade de buscar as horas.

agradeço pela ajuda.
O VBA atual que apliquei para este botão transito, veja abaixo;

Sub OPER_PROCESSOS_BTO_TRANSITO()
'
' Macro filtra na coluna C os processos que estão com o STATUS - 04-TRANSITO.
'
'
Application.ScreenUpdating = False
Application.DisplayStatusBar = False

Range("A8").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.AutoFilter
Range("D8").Select
ActiveSheet.Range("$A$8:$AL$5000").AutoFilter Field:=3, Criteria1:= _
"04-TRANSITO"
ActiveWindow.SmallScroll ToRight:=10
Range("V8").Select
ActiveWindow.SmallScroll Down:=12
Range("V8").Select

Application.ScreenUpdating = True
Application.DisplayStatusBar = True

End Sub
Avatar do usuário
Por Jimmy
Avatar
#49590
Olá ej05,

Não existe um filtro que traga a "data mais atual". O que existe é uma data específica, ou uma faixa de data (digamos entre hoje e anteontem, por exemplo. Uma ideia é você fazer o filtro manualmente, me contar o que foi que fez, e eu automatizo isso.

Uma coisa que pode ser que te atenda (você dirá) é filtrar por status=04 TRANSITO, e deixar a coluna de datas com a maior (mais recente) em cima. Isso não é um filtro como aqueles que ocultam algumas linhas, mas é possível classificar pelo filtro.

Aguardo sua decisão.

Se esta mensagem colabora para a solução do problema, peço que dê um Like, clicando no botão com o "positivo", acima e a direita.

Jimmy San Juan
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord