Ajuda Para Fórmulas No Excel

[RODRIGO BRITTO]

Olá amigos gostaria de saber se alguém tem uma formula para usar no excel para somar os algarismos das dezenas em todas as células . EX; 01 - 05 - 03 - 22 - 34 - 89 - 67 - soma dos algarismos é igual a 50.( ou seja ficaria assim 1 + 5 + 3 + 2 + 2 + 3 + 4 + 8 + 9 + 6 + 7 = 50 ).

OBS: as dezenas tem que ficar juntas nas células ; ex:

dz 01 na célula A

dz 05 na célula B

dz 03 na célula C

dz 22 na célula D

dz 34 na célula E

dz 89 na célula F

dz 67 na célula G

preciso dessa fórmula para 15 ou mais células ( pois nesse ex só coloquei 7 )

AGUARDAMOS RESPOSTAS DESDE JÁ AGRADEÇEMOS A ATENÇAO DE TODOS .

[Gaudencio]

Rodrigo, boa tarde.

é so inseri na celula abaixo do numero a formuma =ESQUERDA(B1;1)

Esta formula vai considerar o primeiro digito de cada celula. É só arrascar a formula para as demais celulas.

[oiregor]

acho q é isso: https://rapidshare.com/files/1907263428/RODRIGO_BRITTO.xlsx

[RODRIGO BRITTO]

OBRIGADO AMIGOS PELA COLABORAÇAO , É ISSO MESMO QUE ESTAVA PROCURANDO

[Nanilinho]

Olá gostaria de saber como calcular as mais atrasadas em excel???

[Substantivo]

Rodrigo Brito

Caro Forense e não forista. Forista não existe no pai dos burros.

Voce tambem poderá usar a seguinte função:

Function SomarD(Digito)

SomarD = "" 'Se o valor não for numero deixa em branco

If IsNumeric(Digito) And Digito <> "" Then

SomarD = 0

For Aux2 = 1 To Len(Digito)

SomarD = SomarD + Mid(Digito, Aux2, 1)

Next

End If

End Function

Vamos supor que os números estejam de A2 a G2.

Em H2 digite:=somard(A2)+somard(B2)+somard(C2)+somard(D2)+somard(E2)+somard(F2)+somard(G2)

Copie a função acima e faça no excel XP:Ferramentas-->Macros-->Editor do Visual Basic--> Insira um módolo e cole a função.

Feche o Editor e insira a função em H2

No excel 2007 voce acessa o editor do visual basic atraves da barra Desenvolvedor

[Substantivo]

Nanilinho

Use a função CONT.SE()

Vamos supor que os resultados da LotoFacil estejam de B2 a P800

Digite as 25 dezenas de R2 a AP2

Em R3 digite:=CONT.SE($B$2:$P$800;R2)

Copie R3 e cole até AP3

Vamos supor ainda que voce queira saber nos ultimos 10 sorteios. Diminua o intervalo $B$2:$P$800 ficando asssim; Em R3 digite,=CONT.SE($B$791:$P$800;R2)

[Substantivo]

Continuação da função somarD

Este final de semana fique pensando porque não concatenar o intervalo das dezenas e depois somar os dígitos ao inves de usar a função SomarD varias vezes. Tentei montar uma UFD, mais dava sempre erro. Então procurei nos meus arquivos de VBA a função UFD abaixo a qual não posso dar o crédito porquer não conseguir identificar o autor.

Function INTERVALO(Delimiter As Variant, ParamArray CellRanges() As Variant) As String

Dim Cell As Range, Area As Variant

If IsMissing(Delimiter) Then Delimiter = ""

For Each Area In CellRanges

If TypeName(Area) = "Range" Then

For Each Cell In Area

If Len(Cell.Value) Then INTERVALO = INTERVALO & Delimiter & Cell.Value

Next

Else

INTERVALO = INTERVALO & Delimiter & Area

End If

Next

INTERVALO = Mid(INTERVALO, Len(Delimiter) + 1)

End Function

Use o mesmo critério acima para por a função no excel.

Vamos usar a duas funções para somar os dígito de um intervalo.

Usando o mesmo intervalo acima (A2:G2) em H2 digite:

=SomarD(INTERVALO(;A2:G2))

[norberto]

Olá amigos gostaria de saber se alguém tem uma formula para usar no excel para somar os algarismos das dezenas em todas as células . EX; 01 - 05 - 03 - 22 - 34 - 89 - 67 - soma dos algarismos é igual a 50.( ou seja ficaria assim 1 + 5 + 3 + 2 + 2 + 3 + 4 + 8 + 9 + 6 + 7 = 50 ).

OBS: as dezenas tem que ficar juntas nas células ; ex:

dz 01 na célula A

dz 05 na célula B

dz 03 na célula C

dz 22 na célula D

dz 34 na célula E

dz 89 na célula F

dz 67 na célula G

preciso dessa fórmula para 15 ou mais células ( pois nesse ex só coloquei 7 )

AGUARDAMOS RESPOSTAS DESDE JÁ AGRADEÇEMOS A ATENÇAO DE TODOS .

[norberto]

utilizando o seu exemplo, faça de forma mais fácil:

colunas (na coluna I coloque esta fórmula)

A B C D E F G I J K L

1 5 3 22 34 89 67 =SE(NÚM.CARACT(A1)=1;A3;DIREITA(A1;1)+ESQUERDA(A1;1))

(na coluna J coloque esta)

=SE(NÚM.CARACT(B1)=1;B1;DIREITA(B1;1)+ESQUERDA(B1;1))+I1

na coluna k coloque esta)

=SE(NÚM.CARACT(C1)=1;C1;DIREITA(C1;1)+ESQUERDA(C1;1))+J1

note que a partir da coluna J, ela soma o resultado da fórmula anterior,

dessa forma voce terá sempre o resultado da soma nas colunas seguintes;

é só escrever a fórmula na coluna I, copiar para a coluna J acrescentando a soma da coluna anterior (+I1) e copiar para as demais colunas;

ficará do jeito que voce pediu

[norberto]

Em tempo,

a fórmula acima é somente para números de dois digitos;

para 3 dígitos deve-se utilizar a fórmula abaixo que conta a quantidade de caracteres e faz a somatória deles

=SE(NÚM.CARACT(B1)=1;B1;SE(NÚM.CARACT(B1)=2;DIREITA(B1;1)+ESQUERDA(B1;1);DIREITA(B1;1)+ESQUERDA(B1;1)+((DIREITA(B1;2)-DIREITA(B1;1))/10)))

é só copiar, colar e trocar as células correspondentes

[Substantivo]

O anhiamento (=SomarD(INTERVALO(;A2:G2)) ) das duas funçãoes acima soma os caracteres que estiverem nas células, não importa quantos sejam, 1,2 ou mil.

[norberto]

O anhiamento (=SomarD(INTERVALO(;A2:G2)) ) das duas funçãoes acima soma os caracteres que estiverem nas células, não importa quantos sejam, 1,2 ou mil.

Na minha versão em (português-2007) não funciona nem como fórmula matricial;

Em qual versão funciona?

[Nanilinho]

Preciso Montar uma planilha que me de as seguintes informações:

Dezenas Atrasadas, Sequencia de dezenas, Frequencia, Numeros primos, Numeros pares e Impares e Repetições

[norberto]

Veja se alguma te ajuda;

Estão todas defasadas em relação ao concurso sorteado

http://www.4shared.com/account/dir/40YOOxZ4/_online.html?&rnd=33

[Nanilinho]

Veja se alguma te ajuda;

Estão todas defasadas em relação ao concurso sorteado

http://www.4shared.c...ne.html?&rnd=33

Ajuda Sim Obrigado!

[norberto]

Ajuda Sim Obrigado!

Todas elas foram feitas na versão Excel 2003, por isso estão defasadas e desatualisadas

[Substantivo]

Norberto

As duas funções acima contidas em meus poste anteriores funcionam em qualquer versão do Excel. Talves voce esteja tendo dificuldade com o editor do VB. Se for este ocaso baixe no link abaixo uma planilha feito no excel 2007. Voce precisa está logado no 4shared para baixar o arquivo.

http://www.4shared.c...mar_Digito.html

[Nanilinho]

tenho uma duvida!

Estou tentando desenvolver uma planilha para conta as dezenas q estao 1,2,3 concursos estao vindo com frequencia!

Grato pela atençaõ

[norberto]

Norberto

As duas funções acima contidas em meus poste anteriores funcionam em qualquer versão do Excel. Talves voce esteja tendo dificuldade com o editor do VB. Se for este ocaso baixe no link abaixo uma planilha feito no excel 2007. Voce precisa está logado no 4shared para baixar o arquivo.

http://www.4shared.c...mar_Digito.html

Baixei sua planilha com o exemplo e compreendi o que voce estava tentando informar.

Entretanto, nem todos no forum tem contanto com a programação VB, por isso coloquei uma fórmula que funciona em qualquer versão do Excel (sem a necessidade de programar em VB), principalmente a 2003 que contem bem menos recursos que as posteriores, cuja fórmula foi desenvolvida exatamente para essa versão.

Ainda existem muitos que utilizam essa versão e não possuem o "módulo de compatibilidade".

Mas valeu. Gostei da solução que voce postou.

[norberto]

tenho uma duvida!

Estou tentando desenvolver uma planilha para conta as dezenas q estao 1,2,3 concursos estao vindo com frequencia!

Grato pela atençaõ

Acredito que o que voce deseja fazer é uma planilha que conta a frequencia das dezenas por uma determinada quantidade de concurso; Quantidade que voce possa escolher?

[Nanilinho]

Acredito que o que voce deseja fazer é uma planilha que conta a frequencia das dezenas por uma determinada quantidade de concurso; Quantidade que voce possa escolher?

Sim...

Assim.. ->

Concurso Dezena

764 1

763 1

762 1

761

760 1

como fazer com q o excel analise q o numero 1 veio por 3 concursos seguidos?? eh isso q eu tenho em mente mas nao sei como fazer

[norberto]

Sim...

Assim.. ->

Concurso Dezena

764 1

763 1

762 1

761

760 1

como fazer com q o excel analise q o numero 1 veio por 3 concursos seguidos?? eh isso q eu tenho em mente mas nao sei como fazer

Verei se tenho uma pronta.

Se encontrar, colocarei no 4shared

[Nanilinho]

Verei se tenho uma pronta.

Se encontrar, colocarei no 4shared

Ok.. Norberto

To tentando criar mas ta dificil... pq sei como controlar qdo o numerio saiu e zerar a estatítica da sequencia sacas??

[norberto]

Ok.. Norberto

To tentando criar mas ta dificil... pq sei como controlar qdo o numerio saiu e zerar a estatítica da sequencia sacas??

Para fazer esse tipo de contagem, o ideal é adicionar um peso para cada saída de zerar quando não sair;

assim:

764 1 = se(o resultado 764 = 1;1+(1/10000);0)

763 1 = se(o resultado 763 = 1;cont.num((resultado da fórmula do 764+resultado763)*2+(1/10000);0)

762 1 = se(o resultado 762 = 1;cont.num((resultado da fórmula do 763+resultado762)*2+(1/10000);0)

761 = se(o resultado 761 = 1;cont.num((resultado da fórmula do 762+resultado761)*2+(1/10000);0)

760 1 = se(o resultado 760 = 1;cont.num((resultado da fórmula do 761+resultado760)*2+(1/10000);0)

dessa forma ele multiplica por dois a soma de dois resultados dando pesos dobrados para cada um, quando a dezena saiu e dá o peso "0" quando a dezena não saiu;

esse é o conceito básico, ma ainda não encontrei qual das planilhas tem esse tipo de contagem

ou simplesmente faça com a seguinte fórmula:

764 1 = se(o resultado 764 = 1;0)

763 1 = se(o resultado 763 = 1;resultado da fórmula do 764+resultado763;0)

762 1 = se(o resultado 762 = 1;resultado da fórmula do 763+resultado762);0)

761 = se(o resultado 761 = 1;resultado da fórmula do 762+resultado761);0)

760 1 = se(o resultado 760 = 1;resultado da fórmula do 761+resultado760);0)

Onde ele apenas soma a saída da dezena anterior com a nova saída, dessa forma ele apenas conta célula a célula a quantidade de saída consecutiva, dando o peso "0" para quando não há a saída;