Midori

@Jmbs Com a fórmula SE você pode colocar o critério para não mostrar nada caso a coluna I estaja como ENCERRADO. Cole em G6 e arraste, =SE(I6="ENCERRADO";"";F6-$C$2)

@JorgeSouza Selecione as duas colunas A:B e em Home > Formatação Condicional > Nova Regra > Usar uma fórmula, aplique a formatação e coloque a fórmula, =E($A1<>"";$A1=$B1)

Não entendi essa parte. A macro modificada para verificar só a coluna I e agora somando 30, Sub AtualizaData(Tabela As Range, Data As Date) Const COL_TERM As Integer = 5 Const COL_PAR1 As Integer = 8 Dim Linha As Long For Linha = 2 To Tabela.Rows.Count If Tabela(Linha, COL_PAR1).Value <> "ENCERRADO" Then If Tabela(Linha, COL_TERM).Value = Data _ And Tabela(Linha, COL_PAR1).Value = "PRORROGADO" Then Tabela(Linha, COL_TERM).Value = _ Tabela(Linha, COL_TERM).Value + 30 End If End If Next Linha End Sub

@Jmbs Não funcionou em que sentido? Nenhum deles atende as condições para mudar alguma data de termino. Mas se colocar a data de hoje em F6 para testar, verá que ela será modificada se executar a macro manualmente já que não definiu nenhum evento para executar automaticamente.

@Jmbs Só faltou remover a coluna G da outra fórmula (NOVO). Depois você só tem que escolher quando a macro deve ser executado.

@LEORCOSTA Uma alternativa seria com tabela auxiliar, p.ex, No primeiro teste o 54 repete nas tabelas dos dois horários e na outra (range cinza). Veja que o total é 5, Segundo teste com 54 aparecendo uma vez na tabela e duas vezes na outra, Neste tem o 54 duas vezes na tabela, As fórmulas, E para atualizar a contagem pode ser com macro para copiar cada dezena para esse tabela auxiliar e ir pegando o total.

@riberex00 Faltou anexar a planilha onde seja possível testar o código e com exemplos do resultado esperado. Pode ser com dados fictícios.

@fe_12212 Você pode fazer um procv, cole na célula F16 da planilha e arraste para as demais células, =PROCV($D16;GERAL!$D:$AO;2+F$15;0) Isso vai trazer todas as legendas registradas na geral. Para mostrar só as presenças e faltas pode colocar as condições.

@Jmbs Remova a coluna da fórmula e cole a macro no módulo, Sub MacroTermino() Call AtualizaData([B5].CurrentRegion, Date) End Sub Sub AtualizaData(Tabela As Range, Data As Date) Const COL_TERM As Integer = 5 Const COL_PAR1 As Integer = 8 Const COL_PAR2 As Integer = 9 Dim Linha As Long For Linha = 2 To Tabela.Rows.Count If Tabela(Linha, COL_PAR2).Value <> "ENCERRADO" Then If Tabela(Linha, COL_TERM).Value = Data _ And Tabela(Linha, COL_PAR1).Value = "PRORROGADO" Then Tabela(Linha, COL_TERM).Value = _ Tabela(Linha, COL_TERM).Value + 1 End If End If Next Linha End Sub Você deve definir um evento para chamar o procedimento MacroTermino, mas pode executar manualmente para testar.

@Jmbs A coluna termino não vai alterar mesmo já que está usando só fórmula em outra auxiliar. Se quiser alterar essa coluna terá que usar macro. Nesse caso o valor de termino deve ser 02/02/2023?

@Gabriel Spinola Sempre terá uma linha sem dados na última do arquivo csv. Isso é comum em arquivos texto por causa do Carriage Return (caractere de retorno de carro). No VBA é a constante vbCr (ou vbCrLf) para mover o cursor para a próxima linha como se fosse o enter. Uma forma remover o caractere vbCr da última linha é com outra macro para ler todas as linhas do arquivo csv e ir copiando para outro, aí quando chegar na última linha não coloca o vbCr.

@Jmbs Seu excel é em português, a fórmula tem que ser esta, =SE(K6="ENCERRADO";"";SE(E(F6=$C$2;J6="PRORROGADO");F6+1;E6))

@Jmbs Com coluna auxliar poderia ser assim,

@JorgeSouza Qualquer valor antes de algum desconto (seja de alíquota, imposto, etc) é conhecido como bruto. O que fica após o desconto é o líquido. É como está na sua planilha, na coluna A tem o bruto e na E o menor valor que é o líquido.

@Jmbs Pode ser em qualquer coluna na mesma linha data. Se for na K, pode colocar em K6 e arrastar para as demais linhas. Fiz uma correção na fórmula, =SE(J6="ENCERRADO";"";SE(E(F6=$C$2;I6="PRORROGADO");F6+1;E6))

A divisão deve ser com o valor líquido e não com o bruto. O cálculo correto é 4.183,03/(1 - 9,25%)

Porque 9,25% é a alíquota que foi descontada do bruto. Vamos supor que você tem R$ 1.000,00 e quer descontar 9,25% desse valor, o cálculo é: 1000 - 1000 * 9,25%. E o resultado é R$ 907,50. Logo foi descontado R$ 92,50. E o (1 - 9,25%) é como comentei antes sobre o valor em evidência e nesse caso é o 1.000,00 que fica em evidência e portanto: 1000 * (1 - 9,25%). Se fizer a distributiva vai chegar na mesma expressão de antes (1000 - 1000 * 9,25%). Quanto ao 90,75%, é o que fica de líquido: 1.000 * 90,75% = 907,50. Então dá na mesma multiplicar 1000 por 90,75% ou por (1 - 9,25%), porém a alíquota que está na planilha é 9,25%, então você tem que fazer esse cálculo com 1. Não está apenas dividindo 1, mas também multiplicando pelo valor. Tem que considerar o cálculo como um todo nessa parte da fórmula: (1/(1-C2))*E2 O E2 é o líquido e lembre-se que nesse tipo cálculo o valor multiplica o numerador da fração e portanto E2/(1 - C2). A divisão na fórmula é necessária para efetuar o cálculo inverso e chegar no líquido. Se você tivesse só o bruto e as alíquotas, este é o cálculo para chegar no líquido: x = 5.771,85 * (1 - 12%) * (1 - 9,25%) x = 4.609,40. Mas se tiver só o líquido a equação fica assim: 4.609,40 = x * (1 - 12%) * (1 - 9,25%) E isolando o x: x = 4.609,40/(1 - 12%)/(1 - 9,25%)

@JorgeSouza Quem criou a fórmula prefiriu fazer assim em vez de apenas dividir o líquido por (1 - taxa), p.ex, O resultado de 4.609,40 / (1 - 9,25%) é o mesmo que [4.609,40 * (1/(1-9,25%))] Também daria para calcular assim 4.609,40 * (1 - 9,25%) ^ -1

@JorgeSouza Essa multiplicação por 1 menos a taxa é porque o valor está em evidência, p.ex, O resultado x - x * 9,25% é o mesmo que x * (1 - 9,25%)

@Jmbs A fórmula com esses critérios pode ser assim, =SE(J6="ENCERRADO";"";SE(E(G6=C2;I6="PRORROGADO");G6+1;E6))

@Diegodcr Se possível anexe uma planilha e mostre um exemplo de como deve ficar.

@Jmbs Se quiser resolver com fórmula terá que criar outra coluna para aplicar a fórmula com esses critérios. Ou pode atualizar a data de inicio com macro, aí só tem que definir um evento (clique do botão, edição da célula, etc).

@Scofieldgyn Você está executando a macro no módulo de outra planilha, por isso acontece o erro.

@Scofieldgyn Na planilha que anexou o nome da aba é PESO_CERVEJAS. Se está tentando rodar em outra é só alterar o nome.

@Gabriel Vechiato Verifique se a aceleração gráfica de hardware está desabilitada, fica em Opções > Avançado > Exibir. Outra que coisa que pode tentar fazer é reinstalar o driver de vídeo.