Renato CMJ

@diego_janjao Exatamente. Opa.. Essa ajuda será muito bem vinda. Não encontrei outra forma de fazer isso..

Olá Diego.

O que eu fiz foi o seguinte: 

SE('Controle Requisição'!$A$5:$A$1048576=$B$2;'Controle Requisição'!$B$5:$B$1048576)

essa fórmula, pequisa todos as datas pela placa. A função MENOR com LIN vai pegando os valores das datas numa matriz em ordem crescente : {01/12;15/12;20/12

;...) e imprimi na sequencia correta. Mas não sei por que, quando tento fazer um "E" alí dentro do "SE" para também colocar o mês como condição, os dados não voltam corretos. 

O que você fez, resolveu esse problema de colocar duas condições (placa e mês), mas não ordena as datas da forma que deve ser (que eu consegui fazer utilizando matriz).

Tentei dessa forma:

{=SEERRO(MENOR(SE(E('Controle Requisição'!$A$5:$A$1048576=$B$2;'Controle Requisição'!$k$5:$k$1048576=$d$2);'Controle Requisição'!$B$5:$B$1048576);LIN(1:1));"")}

           ctrl+shift+enter: retorna 00/01/00. 

Alguma ideia do motivo pelo qual nao estou conseguindo usar o "E" dentro do "SE"?

Em 16/12/2017 às 05:17, diego_janjao disse:

Eu não entendi muito bem o que você fez em algumas colunas () e por isso não mexi nas fórmulas daí, mas acredito que o que eu fiz atenda a sua necessidade:

COMBUSTÍVEL - RENATO - Copia.xlsx

Boa madrugada. kkk

Estou há horas tentando resolver essa parada aqui mas tá difícil..

Estou anexando a planilha em questão.

1. Todos os dados serão inseridos na aba "controle requisição"

2. Os relatorios serao gerados em "relatorio veiculo"

3. problema: em "relatorio veiculo":  se o usuário listar ONC-4960 em B2 e DEZ em D2, devem aparecer de A5:A18 apenas as datas referentes a esta placa e mês de DEZ (em ordem sequencial).

4. o que não estou conseguindo fazer: Não estou conseguindo ajustar a fórmula de A5:A18 para que D2 (mês) também seja uma condicional. Observe que se escolher PQV-5653, e DEZ, aparece dados do mes de NOVEMBRO. 

5. O que consegui fazer e que não pode mudar: As datas precisam aparecer em ordem sequencial.

6. Fórmula (A5) utilizada até então: {=SEERRO(MENOR(SE('Controle Requisição'!$A$5:$A$1048576=$B$2;'Controle Requisição'!$B$5:$B$1048576);LIN(1:1));"")}

Agradeço desde já.

COMBUSTÍVEL - RENATO - Copia.xlsx

Eu não estarei lá para ensinar. 

Mas mesmo que ensinem o básico, eu gostaria de saber esta resolução, pois estou estudando VBA, e isto seria uma grande aula.

Abraços.

8 horas atrás, CasaDoHardware disse:

Sugestão.

 

Aumente o numero de linhas na tabela e ao invés de usar checkbox use uma validação de dados do tipo sim/nao.

 

 

Fica mais fácil a manutenção e o uso da planilha.

 

Fazendo dessa forma basta deixar algumas linhas em branco e sempre que for precisar de mais linhas você apenas seleciona as linhas e arrasta, isso vai copiar tanto as formatações qto as validações existentes nas celulas.

 

 

 

Opa, obrigado pela dica amigo, mas a pessoa que vai utilizar a planilha, talvez não saiba nem selecionar e arrastar, por isso ela será bloqueada.

Por isso eu precisava deste botão bem específico =/

Bom dia amigos,

Segue planilha em anexo.

Na aba "controle requisição", preciso de um macro para adicionar uma linha igual à linha 4 com todas as formatações e condicionais iguais.

1. a macro deve adicionar a linha na próxima linha a partir da última já existente.

2. mesmas formatações condicionais e formatações normais.

3. mesmas fórmulas

4. campos não preenchidos

5. as colunas N e O possuem caixas de seleção. Essas caixas devem aparecer vinculadas à célula na qual ela está inserida (nao estou conseguindo), com a mesma formatação condicional das cores. ex.: a nova linha inserida será a 42, portanto os vinculos serão respectivamente N42 e O42.

6. por fim, o macro deve desbloquear apenas as novas células inseridas nas colunas B, C, D, E, F, G, H, I e desbloquear a caixa de seleção para que ela possa ser marcada e desmarcada (a célula a qual ela está vinculada, pode estar bloqueada), mantendo bloqueadas as demais células, pois a planilha será bloqueada.

Alguém pode me ajudar? 

Agradeço desde já!

COMBUSTÍVEL - RENATO.xlsx

18 horas atrás, Wendell Menezes disse:

Sub InserirLinha()

Dim LR As Long

LR = Cells(Rows.Count, 3).End(xlUp).Row

Application.ScreenUpdating = False
    If Cells(LR, 1) <> "" Or Cells(LR, 2) <> "" Then
        Range(Cells(LR, 3), Cells(LR, 10)).Copy Range(Cells(LR, 3), Cells(LR, 10)).Offset(1, 0)
        Application.CutCopyMode = False
    End If
Application.ScreenUpdating = True

End Sub

 

Funcionou perfeitamente! Obrigado Wendell =]

Boa noite amigos, preciso da ajuda de vocês com um código..

Preciso completar esse código:

Sub inserirlinha()

Application.ScreenUpdating = False

Range("A" & Rows.Count).End(xlUp).Select

Intersect(Selection.EntireRow, _
Range("A:j")).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False

Application.ScreenUpdating = True

End Sub

O excel deve analisar a última linha preenchida. caso nesta linha, as colunas Ax ou Bx (pode ser só uma ou as duas) estejam preenchidas, a linha A até J deve ser copiada e colada logo abaixo, porém os campos da coluna A e B devem estar vazios e os outros (C ATÉ J que conterão fórmulas), deverão estar com as fórmulas.