Edson Luiz Branco

@Susii , juntei ambas em uma só pasta de trabalho. Ideal que tivesse mandado ambas já no primeiro post, aí as fórmulas teriam ficado mais simplificadas. Dá uma conferida nos valores caso seja para aplicação profissional, OK? Se sua demanda foi atendida, marque o tópico como resolvido ao final. Percentil de Pressão Arterial Masc + Fem.zip

Tem que qualificar o objeto para abrir na nova instância: xlApp.Workbooks.OpenText Filename:= blá,blá,blá

@Rodrigo Masson bom dia E se você abrisse não uma nova instância do txt, mas o mesmo txt em uma nova instância do Excel? Sub NovaInstânciaExcel() Dim xlApp As Excel.Application Dim wb As Workbook Set xlApp = New Excel.Application Set wb = xlApp.Workbooks.Add xlApp.Visible = True 'Comando para abrir o txt na instância recém criada '..... '..... '..... wb.Close SaveChanges:=False xlApp.Quit Set wb = Nothing: Set xlApp = Nothing End Sub

Bom dia, @Susii , seja bem-vinda As fórmulas ficaram um pouco mais complexas do que deveriam, visto que as tabelas, principalmente a de referência (Plan2) não têm uma estrutura que facilite. Uma alteração que fiz para diminuir a complexidade foi, nessa tabela, eliminar o texto "th" das faixas de percentis de altura e substituí-lo por formatação de número para poder usar os números. Outra foi nomear alguns intervalos para uso nas fórmulas. Deixei propositalmente visíveis os erros #N/D para sua providência. Eles ocorrem ou quando a idade do indivíduo não consta na tabela ou quando uma das pressões medidas se encaixam em dois percentis, por estar bem no centro (qual critério para desempate?) Percentil de Pressão Arterial.xlsx

=quociente(lin()-lin($a$1);5)+1

@Lucascapi , bem vindo Use Formatação Condicional para quando os valores forem zero ou vazio. Supondo que em A2 seja a Quantidade, em B2 o Valor e em C2 o Total: Preencha A2, B2 e C2 com algum dado para testar Selecione B2 e na guia Início, selecione Formatação Condicional > Nova Regra e escolha "Usar uma fórmula para determinar quais células devem ser formatadas" Na caixa "Formatar valores em que esta fórmula é verdadeira", insira: =OU($A$2=0;$A$2="") Logo abaixo, clique em Formatar Na aba Número, selecione Personalizado e no alto, à direita, clique na caixa "Tipo" e digite três pontos-e-vírgula: ;;; Dê OK em tudo e teste, deletando o valor em A2 ou inserindo um zero, para que o valor em B2 não fique mais visível (embora ele permaneça ali, como pode ser visto na barra de fórmulas).

Acho que se você deixar em branco ou - se já tiver preenchido -, eliminar o conteúdo do campo Servidor de Entrada de E-mails em Configurações da sua Conta > Informações do Servidor deve resolver.

Mas se você já tem os 10 algarismos (0 a 9) cada um com seu retângulo, perde o sentido você ter o SpinButton. E fica com menos sentido ainda ter 10 SpinButtons. Se colocar outros, não estarão mais "somando 1 + 1 entre eles", visto que você pode escolher qualquer valor... Então um botão normal só já resolveria.... Re2-Colunas-com-Celulas-Diagonais.zip

Bom dia, Sr. @Jorge Toledo Tira aí uma dúvida: Conforme você disse acima, seriam 5 retângulos. Porém no anexo estão dispostos 10 retângulos (correspondendo de 0 a 9). Serão 5 ou 10? Cada um terá seu próprio Spin Button?

@Jorge Toledo , não sei se entendi sua dem anda. Verifique aí e dê retorno.. Retorno-Colunas-com-Celulas-Diagonais.zip

Em E9: =SE(($D9-I$14)>$I$15;"Acima";SE(($D9-I$14)<-$I$15;"Abaixo";"Normal"))

Boa tarde amigo @diego_janjao , Eu acho que não dá dessa forma, pois o argumento que a função pede é o intervalo, não uma operação sobre o intervalo. É o mesmo caso do CONT.SES do tópico do ano passado do colega David.sps: Conte.ses - critério mês;ano;nome Talvez você tenha visto algo assim então (matricial), será que não?: =MÉDIA(SE(MÊS(A1:A10)=1;B1:B10;""))

=data(ano(a1);12;31)

@Alexsander Oliveira , boa noite Na célula F4, insira a seguinte fórmula e finalize com ENTER, depois arraste até F18: =SE(CONT.SE(B4:E4;"PENDENTE")>0;"DESISTENTE";SE(CONTAR.VAZIO(B4:E4)>0;"";"ATIVO")) Na célula L4, insira a seguinte fórmula e finalize com CTRL+SHIFT+ENTER, pois é matricial. Depois arraste até L18: =SE(MÁXIMO(FREQÜÊNCIA(SE(G4:K4="PENDENTE";COL(G4:K4));SE(G4:K4<>"PENDENTE";COL(G4:K4))))>=3;"DESLIGADO";SE(CONTAR.VAZIO(G4:K4)>0;"";"ATIVO"))

Procure adicionar seu arquivo aqui, retirando antes informações confidenciais, se existirem.

@lHenrique_10 , boa noite Para fazer isso, é só usar o Localizar e Substituir (CTRL+U): Em Localizar, digite ^b e em Substituir deixe em branco. Clique em Substituir Tudo. Isso elimina todas as quebras de seção do documento. adicionado 37 minutos depois Isso ocorre porque seus documentos individuais não seguem a formatação presente no documento mesclado, e sim a formatação que está no modelo anexado (AttachedTemplate), quase sempre é o modelo Normal.dotx ou Normal.dotm (a menos que o usuário tenha mudado isso, o que é muito incomum). Então, para que seus arquivos individuais fiquem com a carinha do pai altere a formatação do Normal.dotx/dotm para o desejado. Ou, melhor ainda, crie um novo modelo com a formatação final desejada e salve como modelo que servirá de base. Depois baseie seu documento mesclado nesse novo modelo. Para isso, habilite a guia Desenvolvedor e nela, no grupo Modelos, clique em Modelo de Documento e na aba Modelos, clique em Anexar e escolha o caminho onde foi salvo.

@NP Filho Mas é que você escreveu no primeiro post "Multiplicando por... resultando..." Bem, de qualquer forma, aqui vai uma solução via macro/VBA (no anexo). Para funcionar, quando abrir o arquivo tem que aceitar "Habilitar Macros" no botão perto da barra de fórmulas. Dúvida NPFilho - ClubeDoHardware.zip

@NP Filho , bem vindo Supondo que seus dados estejam em A1, A2, A3 e B1, B2, B3, insira a fórmula abaixo onde quiser a soma dos produtos da matriz. =SOMA(MATRIZ.MULT(A1:A3;TRANSPOR(B1:B3))) Obs.: como é uma fórmula matricial, não dê ENTER para entrar a fórmula ao terminar de digitá-la, mas CTRL+SHIFT+ENTER. Alternativamente à função SOMA, pode usar SOMARPRODUTO, também finalizando com CTRL+SHIFT+ENTER.

Bem vindo, @Julio Cesar Thomaz Pela imagem que você anexou, trata-se de uma GoogleSheet e não Excel, não é mesmo? Portanto gentileza solicitar a um Moderador do fórum para mover para a sala correta. Quanto à sua fórmula, ela está estruturalmente correta, só que é uma fórmula de matriz. Então, se fosse no Excel, bastaria finalizar ela com CTRL+SHIFT+ENTER. O GoogleSheet possui uma função especial para matrizes. Ficaria então: =ArrayFormula(MAIOR(SE('Aluguel Secundária'!$A$2:$A$500=$A2;'Aluguel Secundária'!$C$2:$C$500;"");1))

Qual a versão do seu Excel? 2013 ou 2016 365? ProPlus? Se for, já existe uma funcionalidade pronta para isso, é só ativar o suplemento Inquiry/Pesquisa...

Talvez você não tenha inserido as fórmulas corretamente. Dá certo sim, veja no anexo. Dúvida Sandro.zip

Bom dia, @Sandro de Oliveira Castro , bem vindo. Formate a célula como você vinha fazendo, como dia da semana mas use essa fórmula (supondo suas Datas na coluna A): =DATA(2018;DIREITA(A2;2);ESQUERDA(TEXTO(A2;"0000");2)) Se quiser em VBA: Function PegaData(rgData As Range) As Variant If IsDate(rgData.Text) Then PegaData = CDate(rgData.Text) Else PegaData = "" End Function

@xCooca , boa tarde. Não consegui compreender sua demanda. Anexe um arquivo e demonstre o que você fez e o que você quer resolver pois não está nem um pouco claro, pelo menos para mim.

@Diógenes mendes Augusto , boa tarde e bem vindo. Aqui onde estou agora não tenho acesso ao Excel 2013/2016 (só o 2007) que não possui esses recursos. Vamos ver se algum colega dá um suporte pra ti, senão aguarde uns dias.

@Elias Vargas , bem vindo. Na tabelinha resumo, na célula G2, insira a fórmula: =SOMARPRODUTO((MÊS($A$2:$A$123)=MÊS(1&G$1))*($B$2:$B$123=$F2)*$C$2:$C$123) Arraste a fórmula para a direita, depois para baixo. Teste Elias Vargas.xlsx