Notifications
Clear all

pasta de trabalho - dado celula - somar

5 Posts
4 Usuários
0 Reactions
1,528 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

colegas,
mais uma vez,
peço ajuda
enho uma pasta com planilas
em todas a célula A10, eh lançado um numero de 0 a 6
preciso saber no conjunto de planilha o numero x, apareceu
fico grato

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/10/2013 8:55 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

tadeuz,

Bom Dia!

sua explicação (pelo menos para mim) está confusa! Poderia explicar melhor? Poderia compactar seu arquivo e anexar o mesmo aqui?

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 25/10/2013 6:29 am
(@vitor)
Posts: 57
Trusted Member
 

Pelo que entendi você quer saber quantas vezes o número x apareceu, certo ? se for, use a fórmula CONT.SE

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 25/10/2013 6:37 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Colegas vou por partes
1- tenho uma pasta de trabalho com varias planilhas;
2- em todas a celula "A10" tem valores que variam de 01 a 06;
3 preciso saber por exemplo, quantas vezes por exemplo o numero 03, aparece nesta celula em toda a pasta de trabalho.
grato

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/10/2013 3:26 am
(@gtsalikis)
Posts: 2373
Noble Member
 

tadeuz,

A função que você precisa é a que o vitor indicou - CONT.SE.

Caso você tenha muitas planilhas (o que eu imagino que seja o caso), pode fazer isso por macro. Segue um exemplo de código que vc pode usar ou adaptar.

Sub contar()

Dim valor As Integer, contagem As Integer

valor = InputBox("Digite o valor de 1 a 6 a ser pesquisado nas células A10 de cada planilha")

    If valor >= 0 And valor <= 6 Then
    
        For Each Worksheet In Worksheets
            With Worksheet
            If .Range("A10").Value = valor Then contagem = contagem + 1
            End With
        Next
    
    Else
        
        MsgBox ("O valor inserido não é válido!")
        Exit Sub
    
    End If
    
MsgBox ("total de células com o valor " & valor & " é de: " & contagem)
        
End Sub

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 28/10/2013 7:10 am