Página 1 de 1

Numeração sequencial de datas repetidas

Enviado: 07 Dez 2019 às 21:06
por SandroLima
Boa noite, pessoal

Tenho uma macro que insere linhas no topo de uma tabela.

A coluna [Data] pode receber datas repetidas.

Agora preciso que na coluna [Registro] as datas recebam uma numeração sequencial onde a menor data receba o número 1 na coluna registro e datas maiores sejam numeradas sequencialmente (2,3,4,5....)

Até aí eu consigo resolver com uma macro de ordenar datas e depois a fórmula =LIN()-LIN(célula anterior).

Porém preciso que datas iguais recebam a mesma numeração sequencial.

Na Aba "MODO DESEJADO" coloquei manualmente como seria o resultado desejado.

Como devo proceder???

Outra dúvida... como faço para remover a pasta PERSONAL do VBAPROJECT?
Antes não aparecia daí fui fazer um teste com uma macro para desbloquear a planilha e agora está aparecendo.

Segue a planilha para melhor entendimento.

Re: Numeração sequencial de datas repetidas

Enviado: 08 Dez 2019 às 10:09
por Jimmy
Bom dia Sandro,

Segue planilha com uma SUB que faz o que deseja. Basta integrá-la ao seu sistema.
Outra dúvida... como faço para remover a pasta PERSONAL do VBAPROJECT?
Antes não aparecia daí fui fazer um teste com uma macro para desbloquear a planilha e agora está aparecendo.
Que pasta PERSONAL é essa?

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

Jimmy San Juan

Re: Numeração sequencial de datas repetidas

Enviado: 08 Dez 2019 às 21:27
por SandroLima
Boa noite, Jimmy.

Ficou ótima a SUB... era isso mesmo.

Muito obrigado!

Quanto à pasta PERSONAL é aquela que fica na Janela de VBAProject... não consigo mandar a imagem aqui mostrando.

Re: Numeração sequencial de datas repetidas

Enviado: 08 Dez 2019 às 22:34
por Jimmy
Oi Sandro,

Pra mim não aparece isso.

Para enviar figuras diretamente na mensagem , dá uma olhada neste post.

http://gurudoexcel.com/forum/viewtopic. ... uiz#p40083

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

Jimmy San Juan