Edson Luiz Branco

@Patropi , é que você usou cifrão antes do M. Experimente com o cifrão depois do M: assim: Microsoft

Boa tarde, amigo @Patropi ! Mas foi o que eu fiz, não usei Citar, usei Code Veja que o M1 é referência absoluta tanto em linha quanto em coluna (cifrão antes e depois), acho que é uma espécie de auto-texto substituída automaticamente pelo site: Deixe-me fazer um teste aqui mesmo pra ver: No corpo da mensagem: $Microsoft1 Usando Code (com a opção "Sem marcação de sintaxe": $Microsoft1 Usando Citar: ----------------- De fato, a string M-cifrão é substituída por Microsoft

Altere a fórmula em A2 para: =SE(B2="";"";DIAS360($Microsoft1;B2;FALSO)) Depois arraste. ------ Aviso aos moderadores: na fórmula acima, o texto $M $1 (sem espaço) é indesejavelmente substituído por $Microsoft1... editei mas o problema persiste!

Rubens, o problema é que o valor mínimo pode pertencer a mais de um membro da equipe. Qual o tratamento esperado quando isso ocorre? Trazer apenas o primeiro? Trazer todos... em quais células?

Bom dia, @Juces . Seja bem vindo. Tenha em mente que o ideal é sempre anexar um arquivo demonstrando manualmente o que você deseja, senão temos que criar suposições de quais células seriam essas, quais fórmulas... aí com certeza não bateriam com seu problema... desnecessário dizer que isso gera retrabalho e desperdício de tempo. Mas vamos lá, façamos uma tentativa. Supondo genericamente que suas células de entrada sejam Cél1 e Cél2, e que sua fórmula seja SUA_FÓRMULA, uma maneira de resolver seria: =SE(OU(Cél1="";Cél2="");"";SUA_FÓRMULA)

@Augusto César LMP , bem vindo Não há nada de errado no código. O problema deve estar em outro lugar...

@Ruben Jesus , bem vindo Achei difícil entender exatamente qual sua demanda pela explicação acima. Mas se você quiser a menor data de cada coluna "Acompanhamento" colocada ao final de cada coluna, é só usar a fórmula MÍNIMO e formatar a célula para Data. Por exemplo, em E33 a fórmula ficaria = MÍNIMO(E7:E29) e assim por diante nas células H33, K33 etc.

Bem vinda, @Luciene Oliveira Tente a seguinte fórmula: =SOMARPRODUTO((MOD(COL(A1:F1);3)=0)*A1:F1) Se seu Excel for mais novo, substitua a função COL por COLUNA.

Não por isso, parceiro! Mais é porque. fiquei curioso com sua solução e alterei aqui para G2 mas não consegui retornar os valores... acho que não entendi a fórmula...

Só olhando a resposta do amigo @deciog fui perceber que nem seria necessário comparar o ano primeiro (primeira coluna da Feriados) pois os feriados já são datas completas (dãããã) rsrsrsr. Então dá pra usar um simples CONT.SE. Na B7 da REGISTRO PONTO e arraste: =SE(CONT.SE(Feriados!$F$1:$AB$22;$C7)=0;$C7;"FER") ________ Obs.: @deciog , baixei seu modelo mas não entendi: porque o intervalo e sua fórmula começa em H2?

@pauloogio59 , boa noite. É só somar com a C6 e formatar a célula para exibir data que o resultado será 18/10/2017: = $C$6 + SOMARPRODUTO(D12:D71;C12:C71)/SOMA(C12:C71)

Boa noite, @LUCIANO LUIZ ROSA Para facilitar nas fórmulas, dê o nome lstFeriados à lista de feriados que corresponde ao intervalo F1:AB22 da planilha Feriados. Na B7 da planilha REGISTRO PONTO, teste a seguinte fórmula (depois arraste para baixo): =SE(SOMARPRODUTO(--($C7=ÍNDICE(lstFeriados;CORRESP(ANO($C7);ÍNDICE(lstFeriados;0;1);0);0)))>0;"FER";$C7)

Não existe nada nesse intervalo de E10 a E23 na planilha que você postou.! Então você deve ter anexado alguma versão modificada e postado por engano aqui, por isso não deu certo. A fórmula que te passei era pra testar no arquivo que você postou aqui, não numa versão modificada.

Não encontrei inconsistência nenhuma. Quais valores deram diferença? Dá um exemplo baseado nos dados que você disponibilizou na tabela. Somarproduto e concatenar.xlsx

Boa tarde, @Dante Brandão , Insira na célula I10 a fórmula abaixo, clique e arraste por todo o intervalo: =SOMARPRODUTO((ANO($A$10:$A$23)=$B$3)*($B$10:$B$23=$H10)*($C$10:$C$23=I$9)*$D$10:$D$23)

@Eluir , bem vindo Também não entendi muito bem sua finalidade, mas veja se é por esse rumo: Private Sub btnMacro100_Click() Dim i As Integer For i = 1 To 100 Call MacroA Call MacroB Next i End Sub Private Sub btnA_Click() Call MacroA End Sub Private Sub btnB_Click() Call MacroB End Sub Sub MacroA() 'Código da A.... End Sub Sub MacroB() 'Código da B... End Sub

Long é um tipo de dados que só pode conter números inteiros, então não é adequado para seu propósito. Então deve alterar para Double ou Single. Compacte/zipe o arquivo e anexe aqui que o site vai aceitar. ------------------------------------------ Teste assim: Function CDI(DataInicial As Date, DataFinal As Date, PercentualCDI As Single) As Single Dim diini As Long, difin As Long Dim taxas As Range, Cell As Range With Plan1.Range("E1:E10000") diini = .Find(CStr(DataInicial), LookIn:=xlValues).Row difin = .Find(CStr(DataFinal), LookIn:=xlValues).Row - 1 End With Set taxas = Plan1.Range(Cells(diini, 6), Cells(difin, 6)) CDI = 1 For Each Cell In taxas CDI = CDI * (Cell.Value / 100 * PercentualCDI + 1) Next Cell End Function

Bom dia, @Manoel De Freitas Silva Neto Veja se não existem figuras ocultas ou em células visualmente afastadas. Isso ocorre com frequência quando informações da internet são copiadas e coladas nas planilhas: Na guia Início, clique no binóculo (Localizar e Selecionar) depois clique na opção Painel de Seleção e veja aparece uma listagem com alguma figura (visível ou oculta) em sua planilha e exclua se não for essencial.

Boa noite, @HelderREC Tem muitas coisas que não estão OK nesse trecho de código, mas as principais que devem estar retornando esse erro são: As variáveis diini e difin não foram inicializadas, portanto estão com valor zero. Mesmo assim são usadas na linha: Set taxas = Planilha3.Range(Cells(diini, 6), Cells(difin, 6)) --------- isso causa erro. Substituí-las ao que parece por s e e: Set taxas = Planilha3.Range(Cells(s, 6), Cells(e, 6)) O método Find foi idealizado para procurar strings portanto tem problemas ao buscar datas diretamente. Melhor convertê-las ou formatá-las para String antes: s = .Find(CStr(DataInicial), LookIn:=xlValues).Row e = .Find(CStr(DataFinal), LookIn:=xlValues).Row - 1 Ou: s = .Find(Format(DataInicial, "dd/mm/yyyy"), LookIn:=xlValues).Row e = .Find(Format(DataFinal, "dd/mm/yyyy"), LookIn:=xlValues).Row - 1 Tem certeza que sua função CDI deve retornar um Long? você está fazendo um loop com operações intermediárias de divisão na linha: CDI = CDI * (Cell.Value / 100 * PercentualCDI + 1) Como você não anexou um arquivo, não sei que valores estão na coluna F para saber se a operação pode ou não retornar decimais. Apesar de isso não gerar erro no código, seu cálculo pode não retornar o valor esperado devido aos arredondamentos a cada loop.

Bem vinda,@Luana Lima Tente seguir um dos métodos discutidos em: Excel e Word 2016 - Memória ou espaço em disco insuficiente. O Word não pode exibir a fonte solicitada. Eu começaria pelo Método 3 ou 4 pra testar...

@ErickSant , bom dia O valor que você quer é um valor consolidado/resumido considerando uma operação em diversos Registros individuais (SOMARPRODUTO(Col1;Col2)) e que também considere o total de um Campo inteiro (SOMA(...). Além disso os valores estarão sob efeito de um filtro da TD. Desconheço uma maneira de fazer isso com recursos da TD (Item Calculado ou Campo Calculado). Se seu Excel for 2013/2016 já com as ferramentas de Power BI ativas e instaladas você poderia criar uma "Medida" para isso (aqui onde estou a versão é antiga portanto não estão disponíveis). Mas você pode fazer o que deseja por fórmula também, fora da TD mas usando o intervalo filtrado da TD. Por exemplo, na sua planilha onde está a Tab. Din., experimente inserir numa célula qualqer (Ex. C8) essa fórmula: =ARREDONDAR.PARA.CIMA((SOMARPRODUTO($A$4:ÍNDICE($A:$A;CORRESP("Total Geral";$A:$A;0)-1);DESLOC($A$4:ÍNDICE($A:$A;CORRESP("Total Geral";$A:$A;0)-1);0;1))/SOMA($A$4:ÍNDICE($A:$A;CORRESP("Total Geral";$A:$A;0)-1)));0) Se quiser simplificar a fórmula, dê um nome ao intervalo: $A$4:ÍNDICE($A:$A;CORRESP("Total Geral";$A:$A;0)-1) Digamos, TempoMédioTD Aí a fórmula se resumiria a: =ARREDONDAR.PARA.CIMA((SOMARPRODUTO(TempoMédioTD;DESLOC(TempoMédioTD;0;1))/SOMA(TempoMédioTD));0)

@NiltonCapucho bom dia. Seja bem vindo Como anda a saúde de seu disco rígido? Dê uma checada com a ferramenta de verificação de erros do próprio Windows (siga o procedimento descrito em: Verificar o disco rígido para erros no Windows reiniciando o PC e agardando o término da varredura). Eliminar lixos e arquivos temporários e verificação de erros no Registry do Windows também são importantes fontes de erros em aplicativos. Recomendo instalar o CCleaner usar as opções Executar Limpeza e Verificar Erros no Registro. A versão free pode ser encontrada no próprio site da Piriform: Download CCleaner Feito tudo isso, se não funcionar, agora sim tentar o reparo do Office seguindo a orientação das mensagens de erro. Se nem assim funcionar, fazer uma desinstalação completa do Office. Para isso, baixar a ferramenta da Microsoft usando a Opção 2 – desinstalar completamente o Office 2016 com a ferramenta de reparação rápida Reinstalar o Office.

Boa noite, @Taiada Confere aí... coment.xlsx

Toledo, seus números são resultado de uma operação de concatenação e são texto, inclusive os que parecem estar só com um dígito na verdade estão com um espaço concatenado. Portanto pra filtrar diferenciando os com 1 ou 2 dígitos, é só aplicar a função ARRUMAR antes de contar os caracteres: se 2 (os que você deseja), 1 (indesejado) ou 0/vazias (indesejado). Exemplo: =SE(NÚM.CARACT(ARRUMAR(CQ7))=2;CQ7;"")

@Jorge Toledo Anexa um arquivo com exemplo pra vermos como estão formatadas as células.